CHORON PARLE ENCORE ! 

Le professeur Choron, pere d'Hara-Kiri n'est pas mort. Loin s'en faut: il assassine I'lnformatique, la BD, Liberation, le Canard 
enchaTne, le Monde, la CGT et le couple presidential. 



HEBDOGICIEL- Professeur 
Choron que pensez-vous de I in- 
formatique ' 

PROFESSEUR CHORON- 
Pout moi c'est ia tole ce son! 
les meiottes aux poignets Je 
veux bien qu on se serve He i in 
formatique mais qu on ne la 
donne m aux (tics m aux coni'o- 
leurs d imputs Tout ca me fqut 'a 
trouille tj es licele tu es ligoie 
Tu passes la douane ciic-dac or 
le dit "vous devez lani de contra 
ventions. vous devez tant au ce 
sor public', lu es piege C esi U 
nasse L'mlormalique cest la 

HEBDOGICIEL- El I mlormati 
que lamiliale l ordmateur a ia 
maisc-n. qu en penser-vous ' 
CHORON- J en pense rien ei e 
men fous ie suis complement 
nul dans ce domame ' Pourlanl i 
y a eu un gros ordmateur dans ia 
cour ici un T34 j elats un --<- 
premiers a m equiper pour les 
ventes par corresponoance 
I avais fait fabnquer une salie ci 
malisee. ii eiail vachement beaj 
c'etait une belie bete mais quand 
Charlie hebdo s est arrete on a 
i a mis au rancard 
H- Pourquoi avezvous arrele 
Charlie hebdo ' 
C- Parce au on ne vendait Dins 

biic ne vouian plus Oe nous 
H- Pensez-vous que Charlie 
hebdo puisse reparakre un jour 1 
C- Oui, mais avec quelle equipe 
quelle lormule ? Les auteurs me 
tarabusient en ce moment, pour 
le ressortir ' Je vois passer des 
dessinateurs comme Rochette ou 
Anne Vergne qui me disent 
'Merde Choron, tu nous ressors 
un hebdo' c'est tres bien mais 
encore faut-il des mecs sur ies- 
quels ie puisse compter toutes les 
semames C est un travail de 
chien un bebdomadaire Pour 
faire Chame hebdo nous avions 



une equipe me'veilleuse Wo 
imski Cabu Reiser Gebe Ca 
vanna Sylve Caster Ces mecs la 
travaniaient ires vtts et toutes les 
semames tac ca tombait on se 
reumssail autour d une table pour 
boucier chercher la couveriure. 
faire ies bouchetrous et puis 
nop ' ca pana't a i impumene 



coup de temps 

H- Voyez-vpus un successeur 
possible a Reiser ? 
C- Je ne sms pas tres amateur 
de bandes dessmees C est pour- 
tant moi qui ait sorti ie premier 
journal de BD pour adultes. 
Charlie mensuei" en 68 ou 69 
Mais ie laissa'S ie cMom des des- 
smateurs aux redac'eurs pr chef 




mart ei 

cest ditiicile a rempiacer un mec 
comme ca Wounski fail du ci- 
nema il est scenarlste de dims et 
|e ne cms pas qu il abandonne 
pour revenir laire un hebdo. ca 
paye vralment beaucoup le ci- 
nema 

H- Wolmski ne dessine plus ' 
C- Si il dessine encore dans 
Hara-Kirp el .1 (ait une page pour 
le Nouvei Observateur M.i s pour 
I'hebdo il n y a pas qu une page a 
rendre il y a ie bouclage la reu- 
nion de I equipe qui boucle ou il 
faut etre present ca prend beau- 



Entree gratuite a 




Voir page 11 



... C e'a.e"! Deite-i de 
Ton Wolmski ou Wilhem go> ju 
geaient ies BD J ai reeilement 
decouvert ie dessm en laisant 
Hara-Ku mais ce nest quand 
meme pas totalement de la BD 
Pour ia connaitre el la juger. Je 
crois qu II faul etre soi-meme 
dessinateur 

H- Vous connaissez quand meme 
des dessmateurs ' 
C- Ah oui je connais des dessi- 
nateurs il y en a qui me font 
marrer, ceux de moi equipe par 
exemple el d'aulres qui m'endor- 
ment 

H- Des noms ! 

C- Oh il y en a plem Ms ne son 
pas a Hara-Kiri ceux la Hs son! 
aiileurs. c est sur que quand tu 
vois Faizant. II ne m impressionne 
pas Ca manque d intelligence de 
vivacile d esprit de bouillonne- 
ment. il n'y a pas fl idees Des- 
clozeaux aussi. c est nul ' Ou est- 
ce qu ii y a encore chez ies 
aulres ' 
H- Bretficher 



C- Ah. Bretecher j'aime bien 
J aurais bien anne qu elle soit a 
Hara Kin 
H- Bmet ? 

C- Bmet ii est pas mal 
H- Coucho Edika Carali ' 
C- Je les connais pas tous. hem 
H- Gollib 1 

C- Ah, oui lui c est un boi. 
dommage qu ii ne dessine pres- 
que plus 
H- VuiHemin' 
C- Ah VuiHemin | adore 
H- ii a de|a dessine dans Hara- 
Kin non? 

C- Oui une sene qui s appelie 
"Hiiler-SS' C'est l enlani de Rei- 
ser c est Reiser qui nous a foutu 
VuiHemin dans ies paltes " nous 
a dit 'ce gars-la. it ira lorn" C'est 
un gars qu< Tu sais Reiser tra- 
vailait beaucoup 
H- Et VuiHemin ne tout nen ? 
C- Si si il bosse 
H- Tu as vu les baclages qu il a 
lail dans I Echo des savanes ' 
(MDRL Tiens on se lutoie le 
whisky commence a taire son 
ellet ') 

C- An oui it est capable de ca 
Ca c est vraiment grave pour lui 
Ma-s peul etre qu il va changer, it 
est loul teune lout m6me Mais 
sans ca. il est promis a un grand 
avenir C est peut-etre ie procham 

Alors (remplissarje de verres). 
qui est-ce que je pourrais encore 
le citer comme dessinateur 7 
Cabu. qm est un genie Cabu 
cest le plus grand cancatunste 
qm exists au monde Et qui n est 
malheureusement pas utilise pour 
ca C'est vraiment un genie de la 
caricature ■ 

H- II en lait quand meme dans le 
Canard Enchaine 

C- Oui il (ait ies mstoires de 
Tonlon Mais moi, |e pense que 
les journaux, les hebdos de- 
vraieni lous se payer un cancatu- 
nste Cest dommage. ies direc- 
teurs de loumaux sonl des cons 
its ne savenl pas ce qu ils font 
Pour en revenir 3 Cabu il esl 
etonnant II le rencontre au- 
lOurd'hji et demam tu vas retrou- 
ver la gueule dans un de ses rjes- 
sms il aura tout pique lout, les 
mpmdres details 

H- La gueule de Zitrone par 
Cabu. cest pas tnste 
C- ll y a aussi un immense des- 
sinateur dont re vais sortir un 



RHEU, RHEU 1 

Cejtre semaine ies pelits mickeys sonl de COUCHO. Voir 
page 17 



BIDOUILLE GRENOU1LLE 

Ou comment (richer, pirater, modifier, tratiquer, magouiller, 
bidouiller et grertouiller avec les logiciels du monde entier. 
Mais dans la legalite, au moins ? Of course, mon general ! 
Lire page 9. 



ORIC DEPOSE SON BILAN, 
MAIS CEST PAS GRAVE ! 



. Parce quil s'agii d'Onc An- 
gle ter re En irnii .-.,,;. cela ne 
semble pas causer d'mquie- 
tudes a One France Selon 
ces derniers. 6 proposrlions 
de rachat auraient deja ete 
enregistrees, malgre les 3 
millions de iivres de stock et 
les 2 millions de Iivres Ce 
dettes que Iraine a britanni- 
que societe Un syndic de 
failhte doit se prononcer aux 
alentours du 30 'evner pour 
rftgier ia situation Cote ASM. 
la societe qui distnbue One 
en France, I'Atmos baisse 
1579 francs pnx conseille. et 
on murmure m#me qu il se- 
rait moms cher en vente par 
correspondance Raison de 
ia baisse les couts de pro- 



duction ont considerablement 
baisses. et la baisse repre- 
sents une tendance generale 
du marche de la micro-mlor- 
matique 

Et le Stratos - ' II sera a Micro- 
Expo, mais ce ne sera qu'un 
prototype, puisque les pre- 
mieres series prevues pour 
debut levrrer n on! pas ete 
mises en chantier. toujours a 
cause des ditticulles d'Onc 
Angle ter re 

Denis Taieb. qui avail dis- 
paru momentanement de la 
scene, revienl en force en 
annongant rjes pourparlers 
avec le syndic et le directoire 
d'Onc Angteterre pour trans- 
ferer les activites de la so- 
ciete en France 



album ii se vendra probablement 
Ires mat mais n- cois que c est 
le plus ton actueilement 
H- Wilhem 

C- Oui El c est scandaleux que 
Wdhem ne soil pas reconnu 
comme le plus uramj Sur le plan 
trait, tu peux voir son Cessin un 
dessm de Wihem ga se regarde 
comme ca. lu vois C est vrai- 
ment extraordinaire 
H- Il est un peu ardu non ■ 
C- Ah non je parte du dessm du 
trail On decouvnra Wilhem dans 
je sais pas combien de temps II 
tera sa route, mais Bon il y a 
Wolmski. que |'adore Wolmski 
qui a une habuete une intelli- 
gence une finesse, entm c'est 
vraiment un dialoguiste extraordi- 
naire Je suis toujours sur le cut 
quand je vois ces mecs-la, parce 
que ie les vois Iravailler ils sont 
aulour de la table de redaction, its 
atlrapent leur crayon tac lac ca 
part de tous les cotes et puis 
hop. y a le petit ballon, lu regar- 
des ca. tu dis 'Oh ia vache 1 ' 
cest ta joie ' Et puis y a Gebe 
Gebe qui est vraiment aussi un 
sacre dessmateur C est un grand 
bosseur Gebe' Non seulement it 
est redacteur en cbet d'Hara-Kiri. 
mais il arnve a taire des sketches 
pour 'Merci Bernard", il arrive a 



donner des scenarios de film a 

Ooiores Grassian 

H- ll a fait un lilm aussi. "L'an 

or 

C- Oui, ii y a Ires longtemps 
H- ll a ecru le scenario ? 
C- Non. it a tout *art Scenario, 
realisation II a rati ca avec Doii- 
lon. qui esl devenu maintenanl un 
grand realisateur Mais Gebe. 
j'aime bien son dessm 
H- C est dommage qu'il n en 
fasse pas plus 

C- Je le dis. il a pas ie temps 1 Tu 
sais, Hara-KIrl c'est un bouiol 
enormel Remptir 80 pages cha- 
que mois. la rechercne des (dees 
et tout cest considerable' C est 
tout de la creation' C est le seui 
lournal ou nen n est achete 1 To 
vois les autres {ournaux (il sort 
"Absolus" et exhibe une immense 
photo Oe femme nue). lis vont 
dais une agence 'combien il 
vaut, voire reportage sur cette 
nenette la ?", "sa vaut 1000 
bailes' 'tres bien 1 achete, au 
revoir" On met quelques 
commentaires dessus. on se fait 
pas chier Faut parler de cul 7 La 
photo achetee suffit. ils fiient ca 
au maquetliste "liens tu le de- 
merges I* Tandis qu Hara-Kin 



C'est nouveau, 9a vient de sortir : 

L'actualite de la micro-mformatique Lire page 9,10. 



CONCOURS PERMANENTS 

Votre programme, non content de vous rapporter 1.000 
francs par page publiee. peut vous rapporter 20.000 
francs chaque mois ou un voyage en Calif ornie pour deux 
chaque trimestre. Reglement en page interieure. 



DES PROGRAMMES POUR VOTRE ORDINATEUR: AMSTRAD . 
APPLE lie et lie. ATARI 800 XL . CANON X-07 . CASIO FX 702-P. 
COMMODORE 64 ET VIC 20 . EXELVISION EXL 100 . HECTOR HR . 
MSXet compatibles . ORIC 1 ET ATMOS . SINCLAIR ZX 81 ET SPECTRUM. 
TANDY TRS 80. TEXAS TI-99/4A . THOMSON TQ7, TO7/70, ET M05.^ 
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Altemaqne 3.50 DM Beigique 70 Frs Canada 2 50 S Luxembourg 74 Frs Suisse 3 Frs - 
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_STAR WARS 

Prenez place a bord de votre Vic. faites vous accom- 
pagner d'une extension 16 Ko et de votre fidele joys- 
tick et affrontez les espaces mtersideraux ! 

Stephane MARTY 



ft 0=1 H=22 CV=16 S=36876 !-.=iS SC=<j lj=CVT3 C = INT.. S-h II'. 64?,. PQKE3+2,0'-G QH=0 NB= 
3 TR=Q 

1 HD=l>IHT.:<.Ht2:'*e..-J1.J-0 BR=C-U-RB/1,75 F0RI=RBTaRB+5U POKE 1 • PEEK-. I+BR> NEXT 

2 FORI-fll'TOAD^ RtflDJ POKEI, J NEXT 

3 DRTR31, 35,fc;9.1.";7, 241, 146. 148,248 RuhEHbS79, i,v- 3 PmKL36869,207 

4 PRINT"miMW»MIMlM I I9WHIMM e r« l" a riimiwr<r«> a $*» isnn • 

5 ppiNT"ii»»ia i h aeiM»»*E!9G! a nee a" .print- womb a ear* »ea aae- 

6 print "imb i? a a e i? aiMwmie a mae er<« @vciM»MPi>a r< r. e& q<> 
? pRiHT-iiiE a e 'i a a aaa M print '■ibmce.cr it rrr s.ffflRf 




VIC20 



+ 



X 



163,200,147,400,0,9,147,200,163.200.147.400.0,0.147.200.179,490, 
i- 119.163,290, 147,290. 175,200, 175,200. 163,290,147,200, 179,200. 1 



; : -; RtHjl] IFI=+1THEN13 

3 REfllU POKES- I F0RIJ=1T0J NEXT ■ &OT08 

10 DATR147.2 
75,119 

11 BRTR173,! 
75,299 

12 DflTfll 73, 200, 175,200, 179,200.175,200,173.280,175,110-179,110,183,118,41 

13 F3PI=CV-2TGO3TEP-0 P0kES+2, I FORJ=1TO80 NEXT J, I POKES, FOR1»1TO1090 NEXT 
H PUKE 36869. 192 PR IN 1' LTOSIHCUSISSEZ LE NIVEAU" 

13 PRIHT"M«§mi -;> FACILE" PRINT "1MME -> H8VEN" PRINT" MOTTO -> DIFFICILE" 

16 PRINT"mOTW -> TRES DIFFICILE" PRINT 1 ' W 

17 INPUT"li(", 1 LV IFI_V<G0RLV>4THENl? 

18 IFLV«1THENFK290 B=A+190 D«50 
IS IFLV«2THENH"109 B=R+100 0=30 

20 IFLV=3TH£NA=39 B=fl+50 D»I0 

21 IFLV=4THENFI-0 B=0 D»0 

22 PRINT "MDMHMJN INSTANT SVP'" F0RI«RDTGRB+51 1 REflDRS BJ=LEFT*<fl*. 1> C*-RIOHTf<H 



*.l) 

23 J=CHSC(B«: 
NEXT 

24 JJRTR80,40,20.10, 



43+«ffiCCW»64)*7)>*CV J»J+CFISC(C*J-4e+<CfiSCtCf)>64>»?>> POKEI, J 

04, 02, 01, 80, 80, 80, 30, 80, 80. 80 .,80, 01, 01, 01. 91. 01. 01. 81, 01, F 

01,02,04-08, 10, 20, 40. 00, 00, 01. 02, 04, 00, 0F..F8, 99, FC, 04, 09,1 

20, 10, 08, 04, FC3F, 20, 10,08,04,83,0 

29, 3F.99. IF, F0, 10.20.40,80,09.00,0 

70.68, E0. 20. I 



25 DRTH00,00,00,e 
0,29. CO 

26 BflTP,40,7E,99,F8,0F.08,04,02,01,00,7F,40, 
2.7E.00 

27 IiRTH80,40',20,10,F0, IF, 99, FE, 02, 03, 04,08, 
1,02,04 

28 DRTR0B,0F , 18,39, FC,04,09, 13,27,CE, 7C7B, 79, D8, 9F, B8.E4.C2, 81 



29 DflTHFC3F,20, 
F,9E,16 

30 BRTRF9,1B,27,43,8I, 
4,03,01 

31 DRTF)01,01 ,01,3F.10.' 
F,20,47 

32 DRTRFE,41,20. : : i' F8, 04, E2, 00. 00. 80, 80, 60 
8,10,60 

33 DfiTflflO. 20. 40. 4L' ^,11,08,06,05,04,92,92.01,00,90.00,00,90.09 
2,89,45 

34 DflTR23,ll,00,00,00,00,0e,09,0B,0E,00,00,00,00,10,30,D0,70,0E 



,C8,E4,?3,3E,1E,00,80,40,20,10,F0.18,9C.0E-0&,93,04,08,10,20,3 

01,01,01,01,03.05,0B.FC,B0-80,30,60,C0.H0,10.3F,FC,O8.8 

CO, 80- 80- 80, 80, 00- 00- 01, 01, 06, 08. 10, 10. 7F, 82, 04, 88. 08-1 

SB- 20- 21 - 46, 48, 91 , H2, C4, 88- 8 

30,00.00.00,08,08,04,84,62-1 



35 ERTRL0.90, 
6-33,31 

36 DRT«3@,36, 
3-F3.3F 

37 DflTR3F,FF,FF,CD-C7,C3,C0-C0-C0,FF-FF,B3,E3.C3,03,03,03,00-08.80,0e,0S.03,03,0 
6,00,00 



,00,00,00,00.00,30,30,31,33,36-3E,00.00,eC,0C,8C.CC,EC,7C.3E-3 
, ?C. EC. CC,8C,0C,0C- 00, 00, C8,C0,C0,C3,C7,CF,FC.FC, 03-03.83. C3.E 



38 DRTR00,li 



y,R. 



I, C0, 60, 06. 03, 05, 98. 00- 00 -00- 00- 60. C0,R0. 10. 0H. 08, 00.( 



I8-14,R8,D0,EB,70,0E,07, 



15.23,1 



I.70.E0.1 



.14,9 



40 DflTR40,R0,50,2B,17,BF-IC,lD,02,05,0R,D4-EB,F0,D8,F8.1C,lD,0F,17-2B-30,H0,48,B 
3.78-F0 

41 IiRTRE8,E4, 08,05,02. 81, 48, 24, 12,89,48,23, 10, 01, 92, 24, 43- 91 -02,54,89-95. 23*48-8 
9,12,24 

42 DRTR49,B0-30,94,02,31,48,36,I2,01,00-00,00,lB-lB-00-00,08,C3,E7,7E,3C,l8,18-l 
8-3C 

43 PRINT":? 1 

44 G03UB369 BS-0 

'53 F0RTK»eT0<(H+CV;*2)!([7-B 
34 PRINT ,, «W6C=r SCSI L««"NB 

55 I FQH"QRNDV<41 1 BTHENGOSUB350 V=V+H 

56 IFQH*8ANDV}4592THENGO5UB330 V*V-H 

57 IFriH=GRi-ffi.PEEK(37151)RND32>»0THENPOKES-G,0 GG5UB100 

58 IFINT<RND(QJ»CV>*INT(RNDi;Q>#CV>RNDQH=0THENPOKES-D,0 DOSUB200 

59 IFQH=OTHENPGKES-0.3 GOSUB300 

60 IFQH«rjRNDINT(RND'OJ*H) = INT(RNL',O>*H;RNDTR=OTHENPOK:ES-Q.0 GO5UB380 

61 SC*SC+a BS=BS+G IFBS>5HNEQH=GTHENPOKES-Q-130 BS=0 

62 GOSUE800-NEXT QH=0 TR=0 POKE5-Q.0 POKES+Q-0 SC=SC+500 ODTO500 
~~S UF = I 0=3 P=0+1 R«0 N=250 F0Rn'=lT02 

101 POKES-1,8 POKES, N FORI=429STO4303 POKE 1,0 POKEI+C, 1 NEXT POKES, 

102 POKES-N-I0 J«4472 F0RI*1TQ8 POKEJ.P POKEJ+G* 1 J=J-H+Q NEXT POKES, 

103 POKES, N-20 J=4489 FDRI=1T08 POKEJ.R POKEJ+C, 1 J=J-H-Q NEXT POKES, 8 

104 POKES, N-30 FQRI=4313TO4306STEP-O POKE I. D POKEI+C, 1 NEXT POKES. 8 

105 0-32 P=0 R«PN*30 NEXT IFV-4282ORV«4283ORV=4304ORV=4305THENGOTO108 

106 IFPEEK<V>OBZrjRPEEKCV+0)OBZ+aORPEEK'.V+HK>BZ420RPEEK(.V4H+0><;8243THEN188 

107 TR=Q RETURN 

108 POKES, POKES- 1,0 P0KES+ 1.220 P0KEV.58 POKEV+Q-59 POKEV+H.60 POKEV+H+0,61 
"1 FQRI=14TO03TEP-1 POKES+2, I FORJ»1TO100 NEXT NEXT SC=SC+108 

110 P0KEV.32 P0KEV4Q.32 P0KEV*H,32 P0KEV4H4Q.32 rh=0 POKES+I-0 PRINT"^" GOSIJB360 

111 RETURN 

200 V=U+INT':RNIKQ.:.*132; QH=r^ RK=IHT..F:HH>;Q)l|i2)+Q 

201 IFRK=QTHENBZ=46 

202 IFPK"=2THENBZ^34 

203 GOSUE205 G0SIJB287 BZ=BZ+4 GOSUB205 G05UB297 B2=BI44 CiO3UB205 GOSUB207 RETURN 

205 P0KEV-B2 POKEV+H,BZ+G POKEV+H.EZ+2 POKEV+H+Q. BZ'3 POKEv+C, 3 PHKEV+C+Q-3 

206 P0KEV+C4H.3 POKEV+C4H+Q,3 RETURN 

207 F0RXX=1TQ23*9- NEXT RETURN 

300 W=INT<RNDi:Q)*4>+Q 

30 1 I FW=ORNBPEEK < V-Q /=32RNDPEEK ( V+H-0) =320RPEEK ( V-Q; =62THENGOSUB350 V=V-Q 

302 1FW=2HNDPEEK'.V-H.' = 32RNDFLEI ■.V-H+fJ >:=:520PP-;. tl- ■ ■' H - -=i^ ThEIK^..'': UB .. ':■'■< ''^.-H 

303 IFW"3RNDPEEK(V+H*2>-32flNDPEEK(V+H*2+QJ-320RPEEK>V+H*2;=62THENGOStJB35O V-V*H 

304 IFW-4RNDPEEK(V+2>*32RNDPEEKCV+H+2>«32ORPEEK(V+2)=62THENeOSUB350 V»=V+Q 
335 bU-M^-m RE I URN 

353 P3KEV.32 PnKEV+u,32 FWEV+H,32 PQI .EV+H+Ci- 32 RETURN 

363 PakE& + 3..CV-9 P0KEi.-r,t.CV+2,'*b.5-Q POKES+2, 15 

331 FijPl = lT323 J = U+INT',PNpa-' + 5t:i5.:' POKE J, 62 PO^EJ+C- 1 NEXT 

362 1=4272 P0KEI,5 P3KEI+Q,S POKEI+H.7 POKEI+H+0,8 POKEI+r.,2 P0KEI+G4B-2 POKEI*C 

363"pOKEI+C+H+B-2-I=4292 POKEL9 POKEI40,19 PDKEI+H-11 POKEI *H*Q- 12 POKEI+C-,2 

364 POKEI+Cti?.2 POKtl+FBCJ P0KEI+H+C + Q.2 1=4492 POKEI, 13 POKEI + P-14 POKEI*H,15 

365 PuKEE+H'V;),lv POK.Ei+C2 F'QKEI + C + Q, 2 PO»:EI+H--r . ;■ poi-EI + K+C + P- 2 I=-512 POKEI. 17 

366 POKEI+Q.-1S POKE I +H, 19 P0KEI+H+Q.29 P0F-EI+C2 PBKEI+StC.2 P01<:EI+H+C,2 POKEItH 



333 LR=V+H*2 FnR^,j: = 25T TOllSi'E^ -Q POF-^S . SO UZ:'J PGKE'i.i 
331 P0KELP.32 LP^LR*-H*2 P0»- ELR . 63 Fni'.ELRt-C-S 

;■ fr.i-1 ■ ..I -H '^.U-^.[LI..J--:-I3.K.-Pi.;...-^.-.r-lt ! Pi.PNi ;_;_:■■. :,■ LP=0 RETUPH 
l "-p;:.:.- ■._'•■ >--i '■■■,:■::, i--: Li ■ . ; -*n ■^,',-, ppe.-.i ■ . ■-■- -:^:^opp!.. : .f.!,. u<: «■*(.-= 31 the i-Hyn 
384 IFLR>45?9THENPQKELR,32 LR=0 RETURN 

J.:\, IF' Ph-;:' ■3. , : : -.l.'M.'ir.33 =3'HFr-.r.ij M.ltHJM 

386 IFPED<CLR>O6aTHEH0CISUB450 RETURN 

3B7 FORVB=GTOM*2 NEXT G0T0381 

400 POKES. POKES+0,220 P0KE4567.58 PrjKE4563,59 P0KE4569.58 P0KE4579.53 

431 P0t.E433--.63 P3KE4O90.61 P3KE4591.60 P0KE4562.61 

402 FORI=CV-2TO0STEP-O POKES+2, I FORJ=1TO100 NEXTJ- IPOKES+1,0 POKES+2, CV-G 

403 N£=NB-Q IFHB ^THEHFRINT'iSroiDfflDOWroiWIIPIIMiBrMKRHE OVER!" ENS 
494 GH=8 TR=Q Q0TO43 
459 P0KELR.58 P0KES+Q.229 FORI=14TO0STEP-Q PDKES+2- I FORJ=1TO100 NEKTJ, I POKES+0 
.0 
451 POKES+2, 15 3C=3C+49 P0KELR.32 RETURN 

500 REFIDI IFI=+1TH£NPOKES,0 GOTO510 

501 REftDJ POXES, I F0RIJ=1T0J NEXT OOTO500 

502 DHTR147, 350, 8, 8,147, 290, 159, 200, 169, 300. 147, 300, 175, 300, 163, 200, 159. 300- 169- 
200, 159 

503 DRTFI308. 147, 400, 0,68, 147, 330, 0,0, 147, 200, 139, 200- 169, 300, 147, 300- 175, 300, 169 
-208 

504 DRTfll59,'30O- 147,380.0, 18, 147, 300. + 1 

510 PRINT'TT 

511 TK=Q 

513 GOSUE350 GOSUB1000 

514 PRINT-MaBC^SC" ffL="NB 

515 SK-1 G0T053© 

516 G0SUB359 GOSUB1009 

517 PRINT-HaaKC= B SC" !a.="NB 
318 SK=2 OOTO530 

519 TK=TK+Q IFTK=100-BTHEN2000 

520 G0T0513 

530 IFINT(RNr<G)*CV.>=INT<RND<Q>*CV)flNDQH=0THENPOKES-Q,0 GOSUB280 

531 IFQH=QTHENPOKES-Q,0 GOSUB560 

532 IFOH=ElRNDTR«aflNDINT(RND<Q)*H)=INT(RHDCQJ#H)THENPOKES-Q-0 GOSUB650 

533 IFGH=QRNB';PEEK<37151)RNIG2)=0THENPOKES-I.0 GOSUB708 

534 3C=SC+0 BS=BS+0 1FBS>3HNBGIH"OTHENPOKES-0. 130 BS-0 

535 IFQH=ORNDV<4096THEW=V+H 

536 IFQH=QRNDV>4592THENV*V-H 

537 IFSK=1THEN5I6 

538 IFSK=2THEN519 
568 I=INTCRND<Q>*4J+0 

561 IFI=QTHENOOSUB680 

562 IFI^2THENGOSUB610 

563 IFI=v3THENGOSUB620 

564 IFIr4THENG0SUB638 

565 OOSUB205 RETURN 

600 IFPEEK<V-O)=0ORPEEK<V-a)=QORPEEK<:v-Q)=2ORPEEK<V-Q)s3ORPEEK(V-ia>»4THENV-V-H 

691 IFPEEK<V-Q>=32THENV=V-Q 

682 RETURN 

619 IFPEEK<V-H)=B0RPEEK<V-H)-Q0RPEEK<V-H)=20RPEEKCV-H)=30RPEEK";V-h:j-4THEHV*V-H 

611 IFP£EKCV-H1=32THENV»V-H 

612 RETURN 

629 IFPEEK<v*Hj=8ORPEEK(V+H>sQ0RPEEK':V+H)=20RPEEKi;V+HJ=30RPEEK<V*H)=4THENV»V+H 

621 IFPEEK/.V-0>=32THENV-V-Q 

622 RETURN 

630 IFPEEK(V+H>»0ORPEEK(V+H>=aORPEEK<V+H>«2ORPEEK(V4H>=3ORPEEK<V+HJ=4THENV=V+H 

631 IFPEEKTV4H>=32THENV-V+H 

632 RETURN 

650 LR=V+H*2 F0RS0=235T0128STEP-Q POKES/SO NEXT POKES, 
631 PDKELR.32 LR=LR+H*2 P0KELR.63 POKELR+C-3 

652 IFPEEK.aP+HJ=250RPEEK(LR+H)=2e0RPEEKtLR+HJ=29THENP0KELR,32 LR=0 RETURN 

653 IFPEEKaR+H..=26ORPEEKaR+H)=27QRPEEKCLR+H)=30ORPEEKCLR+H)=31THENPDKELR,32 GO 
T066B 
634 IFLR>4579THENP0KELR-32 LR-8 RETURN 

655 IF<PEEKi37151>flND32)=0THENOOSUB709 

656 IFPEEK<LR>O63THENGOSUB450 RETURN 

657 F0RVB=QT0H*2 NEXT G0T0631 

660 P0KE4567.58 P0KE4568.S9 P0KE4S69-38 POKE4570.39 POKE4389,60 POKE4390,61 POKE 
4391 , 60 

661 P0KE4392.61 POKES, POKES-0,8 POKES+0,220 FORI=14TO0STEP-Q POKES+2, I F0RJ=1T 
0109 

662 NEXTJ.I FOKES+Q.O POKES+2, CV-0 NB=NB-G 

663 IFNB<QTHENPR I NT " M mWWWW BPI W HHt> W3CRI1E OVER" END 

664 QH*0 TR=G G0T0513 

789 0=3 P=0*1 R=0 N=250 FORM=1T02 

791 POKES-1,0 POKES j N FORI=4296TO4303 POKEI, POKEI+C 1 NEXT POKES, 

702 POKES, N-10 J=4472 F0RI=1T08 POKEJ.P POKEJ+C. 1 J=J-H+Q NEXT POKES, 

783 POKES, N-20 J=4489 F0Rl=lT08 POKEJ-R POKEJ+C, 1 J=J-H-D NEXT POKES, 

784 POKES, 11-30 FOSI=4313TO4306STEP-Q POKEI, POKEI+C, 1 NEXT POKES, 9 

785 0=32 P=0 R=P N=30 NEXT 

706 IFPEEK<V;^yEZOPPEE)..';v+0^;>EZ + GiORFEEK , ';v+Hj<>B2+20RPEEK':V4H4Q-J^>BZ + 3THEN798 

787 TR=Q RETURN 

788 POKES, POKES-1-0 POKES+1,220 P0KEV.3S POKEV+0,59 P0KEV+H.60 POI FV+H+G,61 

709 FORI=14TD0STEP-1 POKES+2, I FORJ=1TO109 HEr.l NEXT SC=SC+108 

710 POKEV-32 POK.EV+Q-32 P0KEV+H.32 POKEV+H+0,32 QH=0 POKES+1,0 PRINT"^" TR=0 

711 POKES+2. 13 RETURN 

80S pRiNT~jnaananDniEFimHtMt»imi*iiJGHiiRi»H»iiRiiHiKL" 

819 ppiMT i 'nrwm^i nmtmiimffi pn i 'fr i Nrf writ* mimtmmm&mmmmmmmmmntm" n™ |p 

N 

1900 PRIHT":WB"SPC<KrD 9 ,, SPCCK-2>"D Bis , 'SPC(K-4>"BR B e"SPC<K-6)"D ft" 

1961 PRINT" B Be"SPC';K-8>"DR fl E E a , 'SPC-.:K-10>"Ii AH E B F.ra"SPCa(-12.' "DR R Ft" 

L33^ ■ l -::d i- :.3.- :' ; - 'V j" - 

1333 PRIHT-GHH E E E r-ajXIffi Fl fl fl !*;Lli E E B B B@HH RRRR BBEE BDeR fl R fl 



1094 PRINT" E B E B DCCH BflflR BBBBD afi fl Fl Fl 

1095 PRINT" B B BB BR R R B B DCCCeCCCCCCfi R fl 

1096 PPINT"T;NSi DCC'CCOICCr'JLCC" :»ROPiiB 

ce n 

1907 PRINT"B3I VZ1£ 16 IJW'i 

1008 F0RI=1T0R NEXT RETURN 

1089 PRlNT"»r«"3rC' !..■ , IiE3"3PC<K-2?' 

1010 PRINT"B B ■"STC<K-8>-B fi RE B 



e e e Beeccgca r r r h 

B BB Gfl fl" 

ar»iT StDCCCCCCCCCCiICCCCCC 



iJtBBSftM 



PPINT'-B E B B BB C-fl fl fl R FIB E B B DCECCB fl fl fi HB B B BD @H fl Fl fl". 

PRINT'S B B BCCCeCCCCa R fl FIE E ED BR fl FIB B DCCCCCCCCCCCCB fl R". 

PRJNT-WNBBS 'irr^-F o^iC .n:3L3CCL-j:i;cO:3^T^-D 



+a+c, 



leib FPit!-'iin,:-r.;rr,-.r;;[£ir:ccci:cce 3]T<-' , ', fori=itor next return 

1998 C=33792 Q = I H=22 CV=16 '/-43ft -.=36876 K=20 POs'E :j 7 1 ",■:-. !.;t POh-E M5t?, 237 !.v-I 

1999 POKES+2, CV-B U=4996 POKES+3.8 
23 POKEI+H4-0.24 P0KE1+C.6 POKE I +C+C . 6 POKE 2080 H = i-H=S 3j3vI-330 POKE3-0.0 POKES, 253 

"" GOSUB100O PPINT'^aWBOMB-BOMB-BOIIB-BONB" 
■:-4=-.'l + u If .PEEI- 3713-1 iflND32>=0THEN2910 
GOxl.lfciHfiy FFI*(T'^S*[Br.||i:.-rrii^,-Fnt1E-B3ME" 
SH=SH+0 IFCPEEX071S1 »fWD3SJ-eTHEH2B10 



367 1=4232 PQk.F.I-'I P0i:EI+Q,H POKEI 

i+H+ce 

36.3 P3KEI4H+C+0.6 1=4567 POKEI-25 POKEI+0,26 POKEI+2,27 POKEI+3,28 P0KE1+H.29 
363 P0KEI»H+Q.33 POKEI+H+2,31 POKEI+H+3,33 J=C+I POKE J- 5 P0KEJ+Q,5 P3KEJ+2.5 P-3K 

EJ+3, 5 

S70 [ ; -un |-uc:£l-5 PUKEI + Q.5 POKEI + 2,5 POKEI * 3. 5 PuKLi.+iTS.i.V+y-rj 

371 RETURN 



COLOMBIA 



Si scratcher une navette spatiale de plusieurs milliers 
de dollars vous amuse, alors essayez vile ce jeu qui 
consiste a poser Colombia sans casse Ce qui n'est 
pas si facile car pour reussir vous ne disposerez que 
des indications fournies par vos instruments de bord. 



COMMODORE 64 



* 



Laurent LE MAGUER 



SUITE DU N°69 



IFYH^ITHEHPRINTM*". 

IFVH=1'THEHPRIHTI4*". 

IFVH=3THEHPPINTI4*", 

IFVH=4THENPPIHTI4f"i 

IFVH^THENPRINTWa - 

IFVH=6THEHPPIHTI44 ,, a — 

I FVH=7THEHPR INT 14$ " BT~ 

IFVH^STHEHPRINTW'a 

IF'r , H=&THENF'RINTI4* ,, a 

IFVH~10THEHPRINTI4r'a 

IFVH=llTHENPRIMTI4J ,i a 

IFVH=12THENFRIHTI4*"S 

IFYH=13THENPRINTI4S"a 

IFYH=14THENRRINTI4*"a 

IFVH=15THENPRIHTI4*"a 

IFVH=16THEHPRIMTI4t"a 

IFVH=17THENPRINTI4S"B 

IFSW*tSTHEHPRINTI4**a 

IFVH=15THENFRIHTM*"a 

IFVH=20THEHPRINTI4$"B 

IFVH=21THENPRIMTI4?"B 

IFYH=22THENPRINTI4*"S 

IFVH=23THENPPINTI4f"a 

IFVH=24THEHPRINTI4* ,, B 



_y 




edito 



X 4f 



;^440 
34II9 
3460 
}:470 



■"■■■■■■■I o_ 

nmiiiu. 0- 

-iiiiiiii — »ar 

-■■■■■■■i — 10 a — ■■ 




IFH=0THENZZ=2Z>1 

IFZZ;:-=2THEN2750 

ET=IHT>:-E*3.2+!T.'> IFEK4J.AM]jET>=i:aHENST'.ETi=H/i581 

GOTO1510 

FTjRI = irG40Q0 NEXT 

in n--= lrsi i]:!v-.:^:-.r:-ciFiNi';.-.:^ i rooRNDE :--0ih:iil\-2thenli>i 



#**## RAPPORT CE LR f 



) REM****** ENTE.TE DU PRPPORT ***** 

I PR I NT "ITS ■ S" 

) PRINT "Si ! RfiPOPT DE L R MflSB *■" 
I PRINT "a- B"TFE.;3BVS S" 

l ■..<■■■■ :■:■;. BI fflj NfWETTE SPACIRLE S COLUMBIA B 3 B" 

I PRINTS ~" ~~ * ' *" 

i FEi-i**s;:>.v-* : 3*:-f PF.i..i> Tj-l ,;.********** 

j IFLD=lTHFHPPI'-!T-L'I>.-P!- 1 vr:> i ■■,'CisJS h''E.I F 0?F_ '■■'LITRE HAVETTE 
i IFLD=1THENPRIHT" 85HNS D0P1MRGE39" 

: !■■! i-i:; : .-f ;■■■/■, ;■■■;■;■ ;-xv£i: -..■;.;**+****** 

i IFl |-|--riTHEMPPIMT' i .fLE VEH1CULE SPATIRL R ETE aDETRUITB" 
) IFLD=0THENPRINT' 1 DOPANT L 'RTTEPRISSAGE 
j R£f1+++++*++++ CRUSE 1 *** ** ****** 
i in. <-■= cjtihehft* Tin ■':»!..£ uris^in i-Fri if pp i t.t.rges h'r pa; ete»*»»»im sopti 

I PR IP IT". PL M VITLSSL Ii FiTTEPRl^fiijF F'-;T UE»MM»RMM»»»I3" INTCV Wll KfVF 
1 REJS* +*+++* +++ CFIUSE 2 *********** 

i IFV::-26@THENFT-'IMT"C'EST STROP ELEVEB VI T . I1RM. ml" yiL=;6e KM/H 

] PRINT"W VITESSE DE DESCENTE 3" . -INT'SV'II FT/HIN 

1 REN++++++++++ CRUSE 3 +++++++++++ 

l IFS:'l~ei0THENPF'I;!T"S SCPRCH '■ V1T. MAX I . DESCENTE: 1 "00 FT.-'NIN 

I REM-t-++-t-+++t Crii4-;:n C!UE.i-Ji.V. E T- H-+-H-+++ 

i Z! j!-!i !.C.S1>X' ■.■^■i:"(- 

i E 0= t 01-i ■: Illi ', ■:. E F ■ 2>*J 89 < .'.-•199 

i IFE^CiTHCNF'PIIIT'W.ES i:iFf:PI= PF LA HHVF.TTE 30NT fl 3" -EF"IPHNH' 

I IFE>=firHEHPRINT"i.MILES NFllJTIOUEEO DE LA PISTE 

i 1FE WHIRL: -J.i IMHE.- -21 1-IEllPP 1111 ' MSLPFiCH II ff'EF-'H TIN ■ AFFE3 U POINT 

i li-Lli-lJIlNllt.- MJfllliE -jIHENPFUn-nE". nEl:|,II:: i(" iLML^'T L P I Vi 

l IFLTj=OKiNHL-.>_lnnriE:--:-THElir'F'HlT 'H LHVIROH a"EF"ll MM 9 AF'FES LE POINT 

i IFE-::= ,'IHI [(PRINT ' cWEiVJl r-ll j « ',nil hvEI Si.lRv'ULi: I_h PISTE ■': Kf'f-H ''CiTM. 

i itfii.- 2THE.nFPii(T-'i;>r;i£.i.:.Tir. .;m:.ff.i: h drns le desert 



3 C 30 
3540 

3350 

IS 70 



3c IS 
3629 

3*40 

3*50 

3S50 



3700 

3710 

3720 
3730 
3740 

3750 
3760 
3770 

3-30 
■ i-*2 



####« TFfi-JECTrjIFF. DU VOL ##»## 




;:i Piji-.e.j u rcik.FT.-i;. ':- : ; 

3 NEHT 

3 F0PI=EiTO41 STa>=9 NEXT 

3 C-ETFU IFflf'O" "THEN334G 

% G0T04226 

1 PPIMT".S". F0f>l*lT052 PRINT" ", NENT 

3 PPIHT ,l WHHJ».-.i;.il!lilil:,-..f:,:-vr'U:: LEJ COHMRNDES »■•• 

3 GETR$ iFR*=""THEH33?i-j' 

3 IFfli="O"THEH4220 

3 IFfi$="N' , THEIn:-n:-ijf:.j.j, ; .i ; ::.rjTG348e 

5 OOTQ33SP0 



ET LES IH$TPui;ei.i- 



4110 
4120 

4130 
4140 
4150 
4160 
4170 
41S0 
4130 
42(tM 
4210 
422.3 
4230 
4240 

4255 

4250 
42^0 
4280 

42 ?K) 
430O 
4310 

4320 
4330 
4340 
4350 

4:eo 

■ 43 76 



REM** PRESENTATION TABLEAU DE *** 

PRINT"9 PEWSE2 BONCi I 

PF.IN-'GN 'CPiPPF'END PRS R VrjLER EN 5 HINUTESI 

PPINT-LE3 EXFLICRTIOm; SOHT ICI 3IMPLIFIEES" 

PRINT-IL VOUS FflUDRR PLUSIEURS ESiFlIS POUR 

PRIMT'OBTENIF- UN RTTEfiT=.'-RGE ihTISFRISfiUT 

PRINT "HE VOUS DECOUPRQE? PAS -DONNE CHRNCE- 

GOSUB4350 

REM*** CONTROLE DE (.'RSSIETTE *** 

PRIWT-'*I.ES TOUCHES DE FONtTIONS SERVENT POUR " 

PRINT" - Fl - > » 3 ASCENSION RRRIDE B" 

PRINT'H - F3 - > » S ASCENSION LEHTE ■" 

PR I NT" HI - FS - > » S DESCENTE LEHTE B" 

PRINT" - F7 - > » 3 DESCENTE RAPIDE ■" 

PRINT"C0T1MRN2ES 0U TRAIN D'ATTEPRISSACiE 

PRINT'-T - 9 - 5 » S TRAIN SrjRTI B" 

PRINT" - 1 - > — ' — » a TRAIN RENTRE 5" 

G0SUB435S 

REM***** HORIZON HRTIFICIEL ***** 

PRINT"3L'INTJICRTEUR D'HORI20N RRTIFICIEL EST 

PRINT" ICI <*),IL SIMULE L'HORIZON TERRESTRE. 

PRINT"L'HORI^J'i nntlTE '.'::hND VOUS PIQUEZ ET 

='PIrr' DESCEND _01-3iAlt VUUS PEHONfE..: 

PPINT-'LB PISTE SIMULEE SUP L'HORIZON fi-PTIFI- 

PRIHT u EIEL(>TO REPPESENTE LR PISTE REELLE 

PI»IHTI4* 1 -TlM»i" J OOSUB4310 

REM*** INDICRTEUR D£ VITESSE **** 

PRIMT"a_E 'TRUE RIFSF'^ED ii-:iFf-iCP "LOMPTEUR DE 

fp:nt' . ite=se iicic'Uz ^- '.'Ite-^e en noelid; "■ 
print-ce si»3he -> si" visible .tpaduit lr 

P?M'".'ITESSE :..!'■! I TE ■: Dli-vTH^C-E :■ OLi S"EN Lh 
FF'INT'VITEFSE D'PFPPOCHE INF. 300 .<:. SUP. 200 3 
PRINT- (NOTE UH MILE NAUTIQUE/HEURE =1,35 KM/H> 
PRINT ISf'fMW".: GOSUB4310 
REM********* RLTEMETRE ********** 
PRINT"*' 'ALTIMETER-' <RLTIMETPE> VOUS DONNE 
PRINT-'VOTRE ALTITUDE EH PIEB3 U FT =30.40 EH) 
PPIMT'-33 12- <PIEDS,-FT-) SE LIT 33129 PIEDS. 
PRINT-R TjROITE UN ALTINETRE DE PRECISION Mflfi- 
PRIhfT"QUE L'ALTITUDE SOUS 4090 PIEDS 
PRINTI5$"WT, GOSUB4310 

REN******** 'JAPIOMETRE ********** 

PRINT-H.E »/BERTICRL S3PBEED 3IBNDICRT0R IVRRIOMETRE; 

ppk,'T"rfpii:he lr vitesse de chute en F/n (feet 

PRINT" /HINOTE) # 3RTTEHTI0NB # IL FfllJT ATTERRIP 
PRINT"HVEC UNE VITESSE MAXIMUM HE CHUTE 
PRINT" INFERIEURE A 1700 FT-'N .tL'IDEAL EST UNE 

FFIl,T"..';TE3-E HE -00 F I EDS 'HI-1UTE 

PR1NTI3S-II", 0OSPJB43I0 

PE-.M+ + ******* TELEMETRE ********** 

PRIHT"».E 'UHE' arj-ISrOIICE r^lKH;:-OF'lNG SCWNJIPMENT " 

PPINT-fTELEMETF'E'- '■IF-E.I.'FT L-T r.H;.rHNUL t-.HTRE LR 

PRINT "NRVETTE ET LR BRSE HU SOL QUI SE TPOUVE 
PRINT"RU PEBUT DE LR PISTE. VOUS DISPOSE.; BPRES 
PRINT'TE POINT BE 2 NffiJTIBUES POUR ATTERRIP. 
-PRINT"PRSSEE :SlTE Z-IS'-'i'-ME n-li SFDi" ClOSiCTE 
PRINTII*; G0SUB4310 
REN**** TRAIN D'RTTERISSROE ***** 
REM+++++++t+- 1ERE PRGE ++++++++++ 
PPINT"M_E OERP'';TPRIN DATTERRISSRGE> PREMD 
PRINTS POSI TONS HAUTE SJPB K BASSE ' T rflll. ■ ■' 
PRINT'LE TRAIN 30RTI HijOHEIITE LA RESISTANCE A 
PRINT-L'AIR-CECI PEUT PEDUIRE UTILEMENT (tNJ 
PPINT-HON' UNE VITESSE SUPfRIEUPE A :!30 K(VH 
PRINT "CONSERVED LE TPAIN D F1TTEPPIS3AGE EN 
PRINTI2*, GOSUB4310 

PRINT "»>0S IT ION HAUTE JUSQU " R CE QUE . LR NAVETTE 
PEM+++++++++ 2EME F'HGE *+*-<-++++++ 
PRINT"SOIT EN 3J.TURTIDN D" APPPOCHE.OETTE.POSI- 
PRINT-TION EST FIGUPEE SOP L ECRAH DE L-RPPfi- 
PRINT-PEIL PBP FES NAPLES. L EXTRENITE DES 
PRIHT"RILES BOIT ETRE EH FRCE DES MARQUES 

■3OSUB4350 

PEM** ******♦♦+ DEPART *********** 

PRINT "BCHECKLIST D'flPPRGCHE 7 - COMPLETE -" 

PPINT")Sigi»M»»»»»»Mia ■" 

PPINT"»MHiWia C'EST PARTIB 

PRINT" W, FOPI = 1TO50 PRINT" ", NEXT 

GOSUB4370 

GOSUB4350 

GOTO 104O 

REf!****.**»L* rLK-fJOTEMENT ******** 

PRINT"»", FOP: = 1TO?(?0 NE-:T PRINT"!! " ■ F0RI = 1 TOSfiQ 

NEXT 

GETflt IFRf=""THEN4310 

O0TO4360 

=t.V*** + + PE DE PEPOH'SE ***** 

GETR* IFHI=""THEN4350 

PRINT"fl". F0RI=1T052 PRINT" ", NEXT 

FPWT- , 'mmmmA«imtpni.\r.- n,nnnu£p aAPPuvER sup 

UNE TOUCHE" 

RETURN 

REN«####tt#88#«#MS(ttl#tS##tt#####lKt« 

REHWMHMWHHHHP F I N ^WUssttSflttSJUi # 




A part quelques esprits cha- 
grins, vous vous etes mainte- 
nant habitues a cette horreur 
de BD qui vient lernir le noble 
et seneux domains de linfor- 
matique. La page tele vous 
permet aussf, depuis trois se- 
maines. Je couper votre micro 
pour regarder les programmes 
television selectionnes par 
Bombyx. La page cinema, an- 
noncee et promise depuis plu- 
sieurs semaines, arrive au- 
jourd'hui: c'est Clou qui se 
plante pour vous devant les 
toiles grand format Reste plus 
que le serveur telematique et 
nous aurons tenu nos resolu- 
tions de debut d'annee: II sera 
la debut Mars si tout va bien. 
Et les programmes dans tout 
ca ? C est quand msme le pre- 
mier nebdomadaire de pro- 
grammes mformatiques que 
vous tenez entre les mains I 
Eh bien. non seulement les 
programmes gardent la meme 
place dans 1'hebdo. mais en 
plus nous en rajoutons cette 
semaine: Amstrad et les MSX 
lont leur entree et nous espe- 
rons qu'ils resleront longtemps 
avec nous 

- "Mais, vous dites-vous, si its 
rentrent deux nouveaux ordi- 
nateurs, plus une page de cine 
et si ils ne suppriment rien de 
ce qui exists, M y a un true. Ils 
doivent avoir raccourci quel- 
que chose I" 

Ce a quoi je vous reponds I 
"Comptez le nombre de pages, 
he lecteur incredule, il y en a 
quatre de plus 1" 
Et la maison, ne reculant de- 
vant aucun sacrifice, oftre une 
tournee generale et n'aug- 
mente pas ses prix de vente. II 
est toujours a 10 balles votre 
compagnon hebdomadaire. 
Tchao i 



Gerard CECCALOI 



M 






LES COMPTES 
SONT CLAIRS 

Panasonic vient de presen- 
ter a I'Electronic Consumer 
Show une calculette qui a 
la particularity de posseder 
un clavier TRANSPARENT, 
je dis bien "transparent", 
Mais ou vont-ils chercher 
tout ca, et comment t'est-ce 
que ca marche ? Tout slm- 
plement grace a des nou- 
veaux circuits imprimes... 
transparent^, je dis bien 
THANSPARENTS. Quel est 
I'interet de cette machine: 
aucun. Vive les gadgets. 
Par contra, les circuits 
TRANSPARENTS, je dis 
bien transparent, poui- 
raient servir a fairs des 
cartes transparentes ou 
des teles transparentes, ou 
des culottes electroniques 
transparentes, que sais-je 
encore ? 



* VIC 20 

Suite de la page 2 

2%m OOTG2001 

200£. FORJ=1TO10 NEXT RETURN 

201FJ POH.ES.e F0PI=20:.10i2r: : .;.TrF .■.;;■ fr.fES 1 r^iuMOO- "OIL: 00 :-, S2006 NE ■'.! 

2011 IFLV-QTHENJX=4 

2012 IFLV=2THEHJ>!=3 

2013 IFLV=3THEN.j;;=2 

2014 IFLV=4TJHEN.JX=Q 

2015 IFSHy.;:;iHLIJPOi:ES,0 CUT 02030 

2016 WIHT-V P0KES-7,1'?2 FGPI=1TO20 J=U+IN7(FND'Q i *505> PBKEJ/46 POKE J+C . 1 NEXT 2030 PRINT") 



2017 pR:uT"aBK»nffiMMi»Miaar t peiHT"Ht*ntMr ■*■ PRiNT"«iMMiar 

281S POKES, FORI = 1T06 PRINT' IMtMIS " NEXT Si>SiH-1500 

2019 PRiNT'WMPina w RPiNT"i«Miina w 

2020 PRINT" WHWina W S1=S-11 S2=S-12 FORI = 1TO150 

2021 POrfE.*0.22f! POFESi.34 P0(.ES1,42 P0KES2.14 PULEiJ ■ 28 P0KES1 , 33 POKES; 
T 

2022 POKES*0,0 RPINT'-i 



TEN THOUSAND 



Le jeu des 10 000. Emile et leg jeux de des sont 

tombes un peu dans I'oubli de nos jours. 

Grace a Hector, ce vieux pirate, vous allez pouvoir re- 

decouvrir tes vertus analgesiques de ce super jeu de 

des. 

La regie du jeu est dans !e listing. 

Nota: Si vous rencontrez dans la tiste un "u", dites-lui 

bonjour de notre part et remplacez-le par Control"*" 

Andre CHABRAISON 



A suivre : 

En raison de la longueur 
inhabituelle du listing. 
nous passerons ce pro- 
gramme en deux lois 



so 


•vimTjEu 


DES 10 


-"■'"»* 


4.. 


******* BOR 


HECTOR 


HP* *** 


60 


•* PAR A. CHABRAISON **** 


81 


ERROR 3540 








CLEAP255.J.AFFF 






POKE'/FFlO. 








' G0SUB3350 






130 WIPE 








■ ww=i 








PRINTCHR*! 






16 


1 PEN7:C0L0R 
GOTO 1980 


1.1,2, 3 





170 ****** 

190 PEN1;C0L0R4, 0,7,1 

190 SCREEN13, SO, 230,50 

200 FORI=lT06sA<I)=INT(RNDU,7> I :NE) 

210 G0SUB1730 

220 G05UB169O:G0SUB77G 

2T.0 , ***NU'1ER0TATIDN*** 

240 OUTPUT" 1", 42, 145,2 

250 OUTPUT" 2", 112, 145, 2: OUTPUT "3" , IB: 

260 0UTPUT"4",42, 75.2:0UTPUT"5". 112, ; 

270 OUTPUT'PQUR vALIDER TAPER RETURN", 

280 GQT0820 

290 '**RELANCER DES DES** 

300 tonE168,200:TONE131.250 

310 B=LEN(B«) 

320 F0RI=1T0B 

330 A1VAL <HID*(B«, I, 1 > > >=INT(RND( l,7J3 



=7THENG0T059O 

TO 1 O: GOSUB490: GOSUB 1 1 

GOSUB490:NEXT1 

Y=200: ONA 12 > GOSUB370 : 

V=200 

=7THENGOT0630 

TO 1 ; G0SUB490 : GOSUB I '. 

G05UB490: NEXTI 

V=200:0NA<3>GOSUB370 



JO IFO<4)=7THEN&0T067O 
,0 FOR I = 1 T010: GOSUB490: GOSUB ( 251 
PAUSE. 1:GOSUB490:NEXTI 
'0 X=3O:Y=13O:0NA'4>GD5UB37O. 391 



690 IFA(5)=7THENG0T0710 

700 FORI= 1 TO 10;G05UB490: GOSUB': 

) : PAUSE. l:GO5UB490: NEXTI 

710 X=100: ¥=1 30: ONA i5> G05UBT70. 




i RETURN 
) -****i***i 
J OUTPUTCHR*! 1 = 
1 ■****2**«* 
1 OUTPUTCHR*M 
•A, is RETURN 



!J , 1 - RETURN 

I, 1;0UTPUTCHRJ(1 



720 X=170:V=I30 
730 IFA<6i=7THENG0TO750 

740 F0RI = lT01O:G0SuB49Oi6OSJ&<?5O.-'INTiPNDl0,6) )* 
i ) : PAUSE. 1:G051J&490:NEXTI 
750 X= 1 70s V= 130: ONA 1 6>GOSUB370, 390.400, 420. 450. 45 

760 RETURN 

770 ****EFFACE LEB DES********* 

780 FORI-MTO&sEF (I i =A<I ) : Alt I =7: NEXTI : G05UB500 

790 FDRI = lT06lAill=EF<I):NEXTI 

300 GCSU&500 

BIO RETURN 

820 G0SUBI690:GOSUB24BO 

B30 A*="" 

B40 IFNMt (WW>= "HECTOR"THENGOSL'E'2':.80:CS: = A$;GDT010. 

B50 PRINTiPRINTiPRlNTsPRSNT SCORE : "SC 

B60 FRINTsPRINTNei*<WW>-," DUELS DES GARDEZ-VOUS * 

870 T0NEB5, 300s PAUSE. 3s T0NE71 , 380 



450 RETURN 

440 ■****5***t 

450 G0SUB370:S0SUB410sRETURN 

470 GOSUB410:OUTPUTCHR*<192),X+4,V-21,1:OUTPU - 

4B0 - ****7 EFACE******** 

490 PLGTX+1,Y-1,29,49,2:RETURN 

500 ■**<MARQUAGE DES DES******** 

■310 TONE 168, 100: TONE 148, HO: TONE 124, 1 20: TONE 1 < 

520 x=30: V=200 
530 IFA(1)=7THENG0T0550 

540 FDR 1 - 1T01 0: GOSUB490: GOSUB 1 250+ ( I NT ( RND ( 0, i 
) ) : PAUSE. 1 :GOSUB490: NEXTI 
550 X=30;¥=200:0NA(1 I GOSUB370, 390. 400,420, 450, 



920 IFA*-: >CHRS(32ITHENC*=C-S+; 

930 IFLEN'CS) )6TMEN&0T0860 

940. n I9> = 1 :M!(9!-"":M*17;. ="'• 

950 FORi-iTOLENIti) 

960 M«(91=MIDS(CS,I,1) 

970 M(9)=M(8)*i 

9B0 F0RJ=M(B)TOL£N(C*> 



■ IFI 






XI 



'O IFF(9>-lTHENF(9)=O:G0T0BtO 

:0 IFNMt (WW) =' , HECTOR* , THENPR INT: PRINT: PRINT: PR INT: 

IT: PRINT" JE GARDE " :CS:GOSUB2930 

O IFN(1*'WW)<>''HECT0R"THENPRINT:PRINT"V0L1S GARDEZ 

";CS;G05UB2930 



060 F0RI=1T0LEN 
070 FORI=1T06:C 
'BO F0RI = 1T0LEN 
090 F0RI=1TGLEN 
00 F0RI = 1T06:I! 
C*="":I=7[NE: 
10 NEXTI 
20 FORI=1T06 
30 IFD11)=1AI 
40 IFD(I)*lfll 
50 IFD(I)=2AND: 
2AND: 



70 1 



-STHENSQi 



:B(1)=VAL (MID* (CS, I, 1 ) I :f 
:0:NEXTI 
CI) :C!1>=A(BI I)):NEXTI 
C*)sD<CU)>=D<CUI I -Hi NEXTI 
C(I)=7THENPRINT"A REFAIRE ' 
:GO5UB2930:G0T082O 



= 1THE*ISQ=SQ*100 
=5THENSQ=S0f50 
=1THENSG=SQ*200 
=5THENSQ=SQ*] 



THENSQ=Sa*900 
=1THENSQ=SO+1100 
= 5 THE NSQ= SO ♦ 55 O 
=1THENSQ=SD+1200 
■5THEN5Q=S0*6O0 



80 IFDiI)=3AND 
90 IFD(I)=4AND: 
'00 IFD.CI)=40ND 

■10 ifdid=5and: 

120 IFD!I)-5AND 
230 IFDU>=6THENS0=5a+5000 
240 IFD(I)=1THENZ=Z*1 
250 IFDII)=2THENX=XH 
260 IFD(I)=4THENX=X+2 
270 NEXTI 

280 IFZ=6THENS0=SQ+235O 
290 IFX=3THENSO=12O0 
300 FORI=1T06 

310 IFS0O1200ANDD(I)*2AND: 
iC'O 

320 NEXTI 
330 F0RI=tT06 
340 IFSEK>2500ANDD(I> = 



*100> 



■-1ANDI05THENSGNC 



IANDK 



1AND1 



'■5THENSQ=< 



350 I FCS= "O" THENSQ^O: PW= 1 : SC=0 

360 NEXTI 

370 Sr>SOSQ:SQ=0 

3B0 IFLEN(C*J=OTHENHH=l:S0=0:PW=l:SC=0 

390 IFSC=OTHENPR INT "PERDU ";NM* I WW) ; " NE MARQUE I 

": TONE 156,240: TONE 127. 260s TONE 134, 240 :PAUSE2: PR : 
PRINT:PRINT:PRINT 

4O0 IFPW-lTHENHJ=i:HK=l:PW=0sGDTD159O 
410 FORI=1TOLEN<C*):A(B<I) ) =7: NEXT I 
420 IFSC !WW! <800ANDSC<SOOTHENGDT01530 
430 IFNtl* I WW ) =" HECTOR " THENG0SUB2B7O: GOTO 1 460 
440 PR I NTs PRINT: PR IMT: PRINT: PRINT 
450 PRINT"RELANCEZ-VQUS. LES DES:0/N 

" ; : G0SUB2930 
460 IFNn-»(WW)="HECTOR"THeNGOT01510 
470 A»=INSTRS<1> 
400 IFAS=' , n"THENA»=' , N" 
490 IFA«="o"THENA*= ,1 0" 
500 IFA»<; J"N"ANDAS^ ."0"THENE,OTQ1470 



510 IFA»*«' 
0OO":A*="C 
520 IFA»=' 
1590 



5B0 NEXTI 



"ANDSC-1. 



■ °c>.-:hndsC'8C*0THENI 



+SCsSC=0:HJ=1: 






DOCTOR FEEL GOOD 



Au cours d'un incendie, n'ecoutant que 
vous devez sauver les occupants qui se 
meuble. 



votre courage, (Tj 

jettent de Tim- _ ^ 

P. BROSSE I 



440 CALL SDUND'-IOO. 523.0) 

450 CALL VCHAR.(10\31.105.) 

460 PO=PO+1 

470 FOR A=l TO LEN(STR*(PO>) 

460 CALL VCHAR(23,24-t-A,ASC<SEG* 




Til 99 BASIC 
SIMPLE 




FOR P=l TO F 






490 


NEXT A 


Y(P)=V<P)+1 






300 


IF "P01LF THEN 170 


IF VIP)=13 THEN 410 






510 


LP=LP+30 


CALL JOVSTfl.X.V) 






520 


FOR N0=110 TO 1760 STE 


CE=1 






530 


CALL 5DUNDC-100,N0,0) 


IF X=0 THEN 300 








NEXT NO 


CALL KEV(l.XX.VV) 






550 


VQ=V0+1 


IF YV=0 THEN 250 








CALL HCHAR124, 19+W0,42 


CE-2 






570 


CALL SOUND(1,B80,0) 


IF (CC+(<X»2>#CE)<111+ 


CC*t( 


#2)»CEJ 




GOTO 170 


THEN 300 








CALL SQUNDUOQO,-7.0) 


CALL HCHARI 18. CC. 120,2 






600 


CALL ^CHAR(24, 19+V0.33 


CC=CC+( (X*'')!iCEl 






610 


CALL SOUND(-100.5B7,0) 


CALL VCHAR ( IB. CC* 1.145 








CALL 5QUND(-100. 523.0) 


CALL VCHAR118.CL.144I 








CALL SOUNDI-100, 440,0) 


CALL VCHAR<L(P,VIP)-1) 






640 


VD=V0-1 








650 


IF VOOO THEN 760 








660 


CALL VCHARfl, 1,33,768) 
D*- , 'GA■1E I 0VER ,, 


CALL SOUNDU ,BBu,01 






6B0 


US* I 


IF <LCP,WP)> = t7)«<CC< 


,CIP,U 


PI I) THE 


700 


GOSUB 3180 

IF PQ>RECD(N1V)THEN 32 










DI="UNE 'AUTRE IPABTIE!*? 


IF F=1I THEM 160 






720 










730 


GOSUB 3180 


IF K<N1 (NIV)THEN 160 






740 


CALL KEY(3,X,Y1 








750 


IF K<>79 THEN 740 ELSE 








760 


IF P0=0 THEN 340 



850 IF PA>1 THEN 1010 

B60 CALL COLOR'1,4,6) 

870 CALL SCREEN (16) 

B80 RESTORE 930 

890 FOR A=l TO 4S 

900 READ F,D» 

910 CALL CHARlF.D*) 

920 NEXT A 

930 DATA 33.FFFFFFFFFFFFFFFF. 1 

E3C1E6707, 129. 671 71F3C3CDA126, 

7A3CF8E6E, 1 44. 8080FFFFB091 BB9 1 

940 DATA 145,2327E3E73F27A307,' 

B102040a,97,F'F,98.FP0204081020. 

71F3C3CDA126, ; 



FFFFFFF7E1C 

950 DATA 99,010204081020408,100 

03050911214181, 102.FF03O509112 

8O8O8i38O80B0B0BO 

960 DATA 103,FFFFFFFFFFFFFFFF, 



01O1C 



,20, Fl 



: FFFFl 



780 CALL HCHAR'23.24.33,4) 

790 FOR A=l TO LEN(STR*IPD) ) 

800 CALL HCHAR(23.24tA,ASC(S£G*l-; 



FF81B1FFFFFF, 117,0006C82B101 

970 DATA 112,FF889BA8C8BBB89a.] 

1513111119, 13 4.ABCBBBBB9OA0C0FF, 1 

!1110905u3FF, loa.FOFOFBFaFCFCFSF 

9B0 DATA 136. FFFFEOEOEOEOEOE. 137,1 

B.FFFF03030-03030i. 139, EOEOEOEOE 

40. 03 1 3F3 1 303030303 

990 DATA 141,03030303 

f I 8080BOB0B08UK . 09, FFFEFCF 8F0EOC08. 153, 

FF010101010101FF 

1000 DATA 90.001E3F7F 



05.010K 









1FOE,95,FEFCECFCF8F9FOC 






1020 


CALL C0L0R(A.2,6) 


1030 


NEXT A 


1040 


FOR A=5 TD 7 


1O50 


CALL COLOR(A,1,61 


1060 


NEXT A 


1O70 


CALL C0L0R(8, 1,6) 


1080 


CALL C0L0R<9,2,1) 


1090 


CALL C0L0RO0.2.1! 


1100 


CALL C0t-0R<11,2,14) 




CALL C0L0R<12,2,1) 


1120 


CALL C0L0RU3,2,1) 


1130 


CALL C0LORU4.2.4) 




CALL C0L0R<1S,1,2) 


1150 


CALL C0LORI16,2,B) 




D*="- DOCTOR FEEL GOOD -" 


1170 


LE=1 




GOSUB 3 ISO 


1190 


IF PAM THEN 1390 


1200 


IF PR=1 THEN 1390 


1210 


DS="LE FICH1ER RECDRDS EST-IL CREE 


1220 


LE=3 


1230 


GOSUB 3180 


1240 


D*="TAPER <0> DU <N>" 


1250 


LE=5 


1260 


GOSUB 3180 


1270 


CALL KEV<2,AA, BB) 


12S0 


IF 'AA<>6H*CAA<M5)THEN 1270 


1290 


CALL SOUND CI, 3000,0) 


1300 


IF AA=15 THEN 1390 







42,0,152. 



■.91.066FFFF 



__DOMINOS 

Enfin un programme ecnt par une charmante Demoi- 
selle. 

Nous commencions a perdre espoir... 

N.D.L J.C Ouest-ce qui leur arrive aux mformaliciens de Irtebdo ? 
C est le troisieme programme fait par une femme qu 'its laissent pas 
ser dans le journal ' Auraient-ils des remords ? Ou ators cesl le 
lro>d 7 Profttons-en avant quils ne retrouvenl leurs esprils ' 



SUITE DUN° 69 

2880 NEXT Y:NEXT X 

2881 UI=CHIF[W);BI=CHIFC2J 
2B30 IF TR=0 THEN TR=W 
2B35 IF QJ = 2 THEN RETURN 

2900 POKE 656,0:POKE 657,0:7 " 

2910 POKE 656,0:F0R I=W TO Q:IF JOdlOT 

IR THEN ? JCHI);" "; 

2920 NEXT UPOKE 656,0:7 " 

2930 POKE 656,2:POKE 657,0:? ' 



30J0 DATA 255,255,255,231,231,255,255,25 

5 

3020 DATA 255,159,159,255,255,249,249,25 

5 

3030 DATA 255,159,159,231,231,249,249,25 

3 

3040 DATA 255,153,153,255,255,153,153,25 

5 

3050 DATA 255,153,153,231,231, 153, 1S3, 25 

5 

3060 DATA 255,129,129,255,255,129,129,25 

S 

4000 IF 0J=W THEN J0CI)=TIR 

4002 IF QJ = 2 THEN MKIJ^TIR 

4005 JEU«CQ*(Y*Y1 J + X*X1 , Q*t Y*Y1 J+X+XI J-S 

TR*tJECX,Y));JE(X*Xl,Y+Yl)=JE(X, Y) 

4020 IF INTtJ'PXlOJECX.Y) THEN JEU*CQ*( 

Y*2*Y1 )+X+2«Xl,Q*CY*2*Yl )+X*2*Xl J=STR#(I 

NTtJ^PX)):OR=!J 

4030 IF OR^w THEN DR=0 : JE ( X*2*X1 , Y+2*YH 

^INTCJ^PX^GOTO 2800 

4040 JEU«[Q*(Y*2*YniX+2*X],Q*CY*2*Y])»X 

*2*Xn=STR*CPX*r.J-'PX-INTtjVPX]]] 

■1060 JECX*2*X1,Y«-2*Y1 ]=PX*U^PX-INTC J^PX 

UiGOTO 2800 

1496 REM 

4499 REM LA PIOCHE 

4500 FOR PI=U TO 28HF ACPflOTIR THEN P 

DP :&O10 4BB0 

4520 NEXT PI :"DKE G5?,2-t>OKL 656,2 5? "PL 

US DE PIOCHE ■ :PI=100:RETURN 

4599 -REM 

4600 PIO=INT(RNDt01*28)+l =IF ACPI05-TIR 

THEN 4600 




Francorse SALVADOR 



* = *'DEUX" 
$= M TR0IS" 
S^'QUATRE 11 



4611 



FOR t 



TO C 



4620 IF QJ-? AND MICL)=TIR THEN MIfL)=A( FU* 



PIOlJrtfPIOsTlRseop :&0T0 
4640 IF Qj=w AND J0fL)=TIR THEN JOCL! 
PI01 :AfPIO)-TT.ft.PQP :&0 T 4700 
4660 NEXT L 

4670 IPi=CHIFtn:IP2^CHlr(2J 
4700 POKE 656,0:"OKE 657,2^0R L=W TC 
If JQEL1=TIR THEft 4760 
4720 ? JOtLli" ■; 
4760 NEXT L 
4998 REM 

1999 REM COMPTE uES OOMINOS 
5000 J0J'O:JlJ=O; e OR L»H TO Q 
5020 IF JOCDOTIR THEN JQJ=J0J*W 
5040 IF rtltLJOTIR THEN JIJ=JIJ+UI 
5060 NEXT L 

5080 IF J0J=0 THEN POSITION 3,5:? «6 
ue Ov'ez gagne-REM ECRIRE EN U.I. 
5100 IF JIJ-0 THEN POSITION 1,5:? #6 
machine a 9&9ne":REM ECRIRE EN U.I. 

5102 J*=STR*(JIJ) 

5103 IF JIJ^U THEN J*="UN" 

5104 IF JIJ=2 THEN 

5105 IF JIJ=3 THEN 

5106 IF JIJ = 4 THEN 

5107 IF JIJ=5 THEN J*="CINQ* 

5108 IF JIJ=6 THEN M*StX" 

5109 IF JIJ = 7 THEN j*="SEPT" 

5110 IF JIJ=8 THEN Jt^'HUIT" 

5111 IF JIJ=9 THEN J*="N£UF" 
IJ = 10 THEN J«=-"0IX" 
IJ=1 1 THEN J»="ON2E" 
U = 12 THEN J»=' , O0U2E 
IJ=13 THEN JS-'TREIZE" 
IJ=14 THEN J*-"QUAT0R2E' - 
IJ=15 THEN Jt='0UINiE" 
IJ=16 THEN JO^'SEIZE 1 ' 
IJ=17 THEN J«="DIX SEPT" 

5121 POKE 65?,2=P0KE 656,3:? "J»« ENCOR 
E "jJ*J" DOMINOS "; 

5140 IF JIJ=0 OR JOJ=0 THEN POSITION 6,7 
:? *6;"une autre' 1 ; :INPUT C«:IF ASCCC«1 = 7 
§ [HEN Em 

5163 IF JIJ=0 OR -JOJ=0 THEN RUN 
■5180 RETURN 

6998 REM 

6999 REM SIMPLIFICATION DE L'ECRAN 

7000 POSITION 5,5=? #6; 'COMPRESSION 1 
7020 JEU«(W) :JEU*(2001=" -:jEU«t21 = J 



5112 IF . 

5113 IF . 

5114 IF . 

5115 IF , 

5116 IF . 

5117 IF . 

5118 IF . 

5119 IF . 



7040 FOR I=G TO Q:F0R j = TO PX:JECI',J) = 

TISiNEXT J:NEXT I 

7360 JE(PX,PY)=UI;JECFX*W,PY)=BI 

7080 JEUS(0tPY+PX,0*Pv*Px+U3-STR»(PX*UI« 

eu 

7100 POSITION 0,0:? BSJJEU* 

'120 IF QJ = W Th£N 1080 

7140 IF QJ=2 THEN 1200 

7998 REM 

7999 REM ATARI JDUE COUP 1 

8000 FOR I=W TO 7 

8020 CHIF(UJ=INT[MICIJ^PX) 

8040 CHIF[2D=PX*(MICIJ^PX-INT[MICI)-'PX)) 

8060 FOR J=W TO 7 

8080 IE I^J THEN 9140 

8030 MUl=INTCMI!jVPX):MU2»PX*tMI[J VPX- 

INTCMICJJ'-PXJ) 

8100 IF CHIFCUUOO AND ( tCHlF ( U)=MU1 OR 

CHIFCW1=MU21 OR CCHIFEttt-W] ANO CHIFtWl 

-HU2J) THEN CHIFCW1=0 

8120 IF CHIF(2)<)0 AND [ CCHIF{ 21=MU1 OR 

CHIF(2J=MU2) OR CCHIFC2];=MU1 AND CHIFC2) 

-ntl2n THEN CHIF(2)=0 

8140 NEXT J:IF CHIFCU)=D AND CHIFt2)=0 1 

HEN J=t1I[I]:P0P :RETURN 

8160 NEXT I:I=UJ:J=MICI):RETURN 

8998 REM 

8999 REM ATARI REFLECHI 

9000 FOR I«W TO Q:jJCI3-TIR:NEXT I 
9020 N=U:F0R I=U) TO 

9040 MU1 -INTf MlflJ/pXJ :nU2'PX*tMI(I J^PX- 

INTCMICIVPX1) 

9060 IF MUUCHIF{W1 OR MU1=ChIF[2] THEN 

CAJ=MU2:&0T0 9120 

9080 IF MU2^CHIFCW1 OR MU2=CHIF[21 THEN 

CAJ=MU1 :&0T0 9120 

9100 GOTO 9220 

9120 FOR J=N TO Q 

9140 IF MIfJ]=TIR OR I=J THEN 9200 

9160 MUl = INTfMI{ JVPX)iMU2=PX*inirJl'-PX- 

INTtflltJVPXJJ 

9180 IF rtui CrtJ OR NU2-CAJ THEN OJ-2tJJC 

K3=I:N-Ntl 

8200 NEXT J 

9220 NFXT I 

9225 IF JJ(W)=TIR IhEN 9240 

9230 FOR J =U TO N-i* 

9231 MUl^INTfrilf JJ[jn^PX):MU2=PX*[MI(Jj 
t J))'PX-INT(MIU JCJ3VPX)) 



9233 NEXT j:I-JJtU):J=MICI):GOSUB 2500:( 

OTO 1080 

9240 FOR I=U TO Q 

9260 IF MItIl=TIR THEN 9320 

9280 MUl=INTthI(I)/PXD:MU2'PX*CMICID'PX- 

INT(MICIVPXJ) 

9300 IF CHIFCM1=MU1- OR CHIF(2)=MU1 OR CH 

IF[U]=MU2 OR CHIFC2J=MU2 THEN J=MICIJ:PO 

P :QJ=2:&0SUB 2500:&OTO 1080 

9320 NEXT I 

9322 IF JJtW)»TIR THEN 9340 

9323 FOR J^U TO N-W 

9324 t1Ul^INTtMI(JJCJ])-'PX):nu2 = PX*lMI[JJ 
f J))<-PX-INT[MI(JJ{J31^PXJJ 

9325 IF MU1-CHIFC1J AND [MU2=IP1 OR MU2= 
IP2) THEN I=JJ(J1:J=MICI):&0SUB 2500 :&OT 
1080 



JCW1 :J=MI(I) :&0SUB 2500=& 



9330 NEXT j:I= 

OTO 1080 

9340 PI=0:QJ=2:P0KE 656,2=P0KE 657,2:? ■ 

IF PTtlCHE ' :&OSUS 4500 

■-IF PI=100 THEN 1080 

8360 IF PIO100 THEN PI=100:&OTO 12i 
14398 REM 

14999 REM RATTRAPAGE DES ERREURS 

15000 TRAP 15000:POKE 764,158:&OT0 PEEKC 
1S63+256*PEEKC1873 



AM >-^ 



Tl/ 99 BASIC 
SIMPLE 



Suite de la page 4 




.380 GOTO 1160 
.390 D*»"HECORDS. ■ 
.400 LE-7 



1440 LE-LE+2 
1430 D*-"NIVEAU ' 

DlTllt." 'IMOMMTI 



164.0 NEXT 










16B0 CALL 
























1720 CALL 




lOl 












ll> 


17S0 CALL 


VCHAR 1 2, JO 


vw 


1760 CALL 


VCHAR<2.31 


1U 




VCHAR(3.9.9fe> 


1780 CALL 


HCHAR 13.10 




1790 CALL 


HCHAR 13.29 




1800 CALL 




■ 














1&30 CALL 




w 


1840 CALL 


UCHARI4.30 




1BS0 CALL 






1960 CALL 


HCHAR 1 5, S, 




1970 CALL 


VCHAR 15,29 




i960 CALL 


HCHAR (3,3 ;9 












VCHAR16.8, 




1910 CALL 


HCHAR 16.9. 




1920 CALL 






19J0 CALL 


















1960 CALL 






1970 CALL 






1490 FOR 


-C=29 TC 3<l 




1990 CALL 


VCHAR (7, CO 


1W 



"!<STR«(REC 



J FOR CC-31 TO 29 8TEP - 



J CALL VCHABIL 



1 DE JEU CHOISI 



1S10 G09UB 3180 
IS20 D*-"TAPER <1 



1540 GOSUB 3190 



1 CALL HCHAR 121, 1, 

i FOR A"2 TO 4 

> CALL C0L0R(A,2,' 



TOAO 


CALL HCHAR ( 


3,28,100 




CALL HCHAR ( 


3,31,96) 


2080 


CALL HCHAR ( 
CALL HCHAR 1 


\%*W 


21<M 


CALL HCHAR ( 


5.29,100 


21 1C 


CALL HCHAR 1 


3.29, 96) 


2120 


CALL VCHAR i 


6,28.961 




FDR LL*7 TC 






CALL HCHAR I 




S1BC 


NEXT LL 






CALL HCHAR! 




217C 


FOR CC-11 1 


3 23 STEP 


ZIBO 


CALL HCHAR 1 


7.CC, 1121 



2200 CALL \ 



..•270 CALL 


VCHAR 1 1 2. CC 


HZ) 


2S60 


DEIN,A1=DES 


.^390 CALL 


VCHARU2.CC 






NEXT N 


."."70 CALL 


VCHAR < 1 3, CC 








.'7-00 CALL 


VCHAR! 13. CC 


1,1131 


2990 


DATA 116.116,130.120.130,143.1 


3310 NEXT 






9,130,128,129, 130 












J330 CALL 


HCHAR t 1 1 , 1 7 


137,2) 






2;ao CALL 


VCHAR (11,19 


130) 








VCHAR c 12, 16 


139) 




FO-0 






1S2) 




CE-1 


2370 CALL 


VCHARU2, IB 


153) 


2950 


CC-11 


2390 CALL 


VCHAR (12, 19 




2960 




2J90 FOR 






2970 


FOR A-l TO 11 


2400 CALL 


VCHAR ILL, 16 


139) 


2990 






HCHARCLL, 17 




2990 




2420 CALL 










2430 NEXT 






3010 


NEXT A 


2440 CALL 


VCHAR 11 4, 19 






CALL VCHAR119.il. 144) 






20.32) 




CALL VCHAR<18. 12. 1451 






21,32: 




D*-" - ' DOCTOR ! FEEL ' QOOD - " 


2470 CALL 


HCHAR120. 1, 


20,321 




LE-21 


2480 CA-99 








2490 FOR 


L-2 TO 3 




3070 


OT«"NIVEflU! : ! "*CHR«(Xi 


2500 FOR CC-2 TO 4 




3OB0 


LE-22 


2510 CA-CA-M 




3090 


GDSUB 31 BO 


2520 CALL 


VCHAR (LL, CC 


CA) 




D»-"VlE5'5aLJV£ES': ' 


2530 NEXT 










2540 NEXT 






3120 


GOSUB 3190 


2550 CA=B9 




3130 


D*-"CHANCES': 


2560 FOR 


L-S TO 6 




3140 


LE=24 


25S0 ™C 


>4 TO A 




3150 


GOSUB 3190 

CALL HCHARL24,20,42,41 


2590 CALL 






J I/O 


RETURN 


2600 NEXT 


CC 






CE-(32-LeNlD«J)/2 


2610 NEXT 






3190 


FOR A=l TO LEN1D1) 


2620 CALL 






3200 


CALL VCHAR(LE,CE-A,ASC(SEG»ID» 


2630 CALL 










2640 IF P 


>1 THEN 290C 








2650 RESTORE 2730 






RETURN 


2660 FOR A-l TO 12 




3230 


D«- 11 RECORDBATTU 


2670 READ 


LD.CD 




3240 


LE-3 


2690 FOR N»l TO 11 




3250 


GOSUB 3190 






3240 


D»-"VEUX 'TLUL'ENREQlSTRER'T'O/h 








3270 


LE-7 


2710 NEXT 






32B0 


GOSUB 3 ISO 


2720 NEXT 






3290 


CALL KEY<2,AA,BB) 


2730 DATA 




7,11,14,13,11,15,1 


3300 






.14.21,11.23 


,14,23,17,27,10,31 




CALL SOUND (1,3000,0) 


2740 RE9T0RE 2910 




3320 


IF AA-15 THEN 710 


2750 FOR A-0 TO 12 




3330 


PRINT "RECORD'BATTU'PAft'l" 








3340 


INPUT "l0 l LETTRES'MAXIMUM'"iN01 










IF LEN(N0»)>10 THEN 3340 




1-OR 






NOMKNIVl-'I'lNOM.' 1 ) 11 


2BO0 NEXT 






"uo 


OPEN •1:°CS1",SE0UENTIAL, 1NTERA 








UTPU 




00, 100, 10( 








2920 RESTC 






3400 


PRINT •l!REC0(T),NOi1»lTl 


2930 FOR t 


-1 TO 12 




3410 




2840 READ 






3420 




2BS0 FDR n 


■1 TO 11 




3430 


QDTO 710 



COMPOSITION 



APPLE 



Musicalisez voire Apple, compositionnez (NDTA- D'OU pale de mus| fl ue en enlevani toules les lignes de 11 a la fin et en 

le nnml dps mnrrpauv avpr rp rtPtit nrnnwrnmo Ho 1apanl BSAVE MUSIC. A$ 302,L$ 38. Pour utiliser cette routine 

ie nomj aes morceaux avec ce petit programme de dans lun de vos programmes !apez BL0AD MUSICp poke 768 hau . 

musique. teur (entre et 255) et poke 769, duree (toujours entre et 255). 

.... .. , Patrick ATLAS Call 770 execute le son. Exempte: POKE 768,40 

Mode a emploi: POKE 769 22 

L' utilisation est simple, vous pouvez sauvegarder la routine prirci- CALL 770 ' 



A suivre: 

En raison de la longueur in- 
habit uelie du listing nous 
passe rons ce programme 
en deux fois. 



'6,206: POKE 777,1: POKE 77B, 

3: POKE 779,240: POKE 7BO,-*: 

POKE 761,202; 

POKE 7S2.20Bt POKE 783,245; POKE 

7B4.174: POKE 7BB,0: POKE 7B 



602,169: POKE aOJ,25'it PD'E 
804, J2: POKE 80S, 166: POKE S 
06,252: POKE 607,202: POKE 6 
08.2OB: POKE 609,250: POKE 8 





Kft GOTO 


21 






POKE 768. J I 




-oyc 7i,w 


JI.JG.2): CA 






,0 FOR JH - 










Y,JKJH,2l: 






H; RETURN 


FOB JJ - 


4-? TO 4 


: POKE 768, 


JltJJ.l) 








"11 CALL 770: NEXT 


JJ: RETURN 




5 "FaiT":' 


HIK- .0 


GOSUB 160: C 


SIJO: RET 






15: HTAB 


8: INVE 




PBS DE 


IEL0D1E 


N PIEMOIRE": 


NORMAL 


GOSUB 


50: CALL 80 


->: VTAB 


5: CALL 


- 668: GOTO 



?0, 32 , 65, 40, SO, 46. 76 , 47 , 7 1 
1 , 67, 3, 255, 46, 242, 50, 229, 3 
214,37,204,38, 192, 39, I Bl, 4 



SE2E-RE BEMOL.r- 



B21.72: POKE 
23,72; POKE E 
DI" DU»<14),DL 



>,152i POKE 6 
96 
l),N0«(33),N0 



"UNE MELODIE EST DEJA EN MEM 
OIRE": NORMAL : GOSUB 150: CAL 
BOO: .VTAB 15: CALL - B68i GOT 



DATA RQNDE,255, 

LANCHE POINTEE, 192, NOIRE, 64, 

NOIRE POINTEE, 96, TRIOLET NOI 

RE, 43 

DATA CROCHE, 32, C ROCHE PQ1NTE 

E,4B, TRIOLET CROCHE, 21 , DDUEL 

E CROCHE, IS, DOUBLE POINTEE, 2" 

7, TRIOLET DOUBLE, 11, TRIPLE C 



SOL 


Ml BEMOL.MI 
BEMOL 

SON SEUL 


« 


A DIEZE 

NDM DE 


mm 


.DOUBLE CRO 






REM 

REM 
FOR 


---LECTURE 
IA = I TO 1 


DES 


DATA-- 



IEN RETURN 
.<T,2> = HA:I- 
TI OR TK THE 



—HAUTEUR NOTE 

IT - TA: FOR IH 



793 IF TH THEN TM - O: HOME : RE 

794 VTAB 23: INVERSE ; PRINT "LE 
CTURE / F=FIN": NORMAL : WA1 

- 163S4,128;X = PEEK ! - 1 
6364) - 128: POKE - 16368,0 
: IF X < > 70 THEN 794 
796 HOME : RETURN 

800 REM CHOIX PRINCIPAL 



1 TK): HTAB 5: 



"ANNULATIDN : VTAB I' 3: INVERSE 
: PRINT "INSERTION DUNE NOT 
E"l NORMAL 
IF TK THEN T = LI: HTAB 5: PR] 



i FOR I 



TO I 



•■CHOIX 



350 NEXT IE, ID 



40,60,80,1 
1*5,140 
FI THEN Fl 



E.rtl BEMOL,MI,F 



,114, 107, !< 
,80,80,76,7 
56, S3, 53, 5C 



READ D0*(JA1: NE 


T JA 


read em<i,iii RE 


D ERMJ.,2) 


1 FOR JC = 3 TO I 


: READ ER* 


IJC, 1): READ ER*( 




JC:ER»<2,1) = ER» 




,2) - ERUJ.Zi 




<2,2> - '■LOCK"-CD 


(3 11= "D 


EVERROU I LLASE " : CO 




NLOCK":CO*(6,1J - 


'VERIF1CAT 


I0N":CO«(6,2) - "VERIFY" 


C0«15,l) = "SUPPRESSIDN":C0*1 


5,21 - "DELETE" 





INVERSE : PRIN 1 * 



MO THEM VTO 
HSE : PRINT ■ 
1 NORMAL : GO 



■VTAB J 

5: PRINT CH«(IK)i I 

23: INVERSE i PRIN* 

RINCIPAL": NORMAL 

VTAB OH: HTAB 4i INVERSE i PRIf 

">"i NORMAL ■ WAIT - 16364, 

1^8: X = PEEK 1 - 16384) - 1 

LC = 1 * 1 * <X • 13> * 2-» < 
X = 11 DR X - 101 : ON LC GOTO 
620,840,630 



• 10 AND CH = 
FICATION 



920 VTAB 23: INVERSE 1 PRINT " 

DIFICAT1DN": NORMAL 
930 VTAB MO: HTAB 4; INVERSE : 



INVERSE : PRINT 



XECUTION, 



1 TO 36: READ JF 
,1,JGI - JFtCL7.fl 
I NEXT JE 



: - lO AND NO < 
1 1 AND ND > 1 

1 AND NO = I J 
> AND NO » 19) 



950 VTAB MO; HTAB 4 



970 RETURN 



CORRECT I ( 
I CAT I DNS 



68, Jt <JJ,1>; 
JJ: INVERSE : 



•ftU REV01R-..": FOR JF = 5 TO 
3S: POKE 76e,JI(JF,l): POKE 
769,JHJF,2>: CALL 7701 NEXT 
JF: END 



250 DATA ERREUR DETECTEE, 14, V »D0 REM ---DUREE NOTE-- 

ALEUR ERRONEE SUR VOLUME OU *C'l fi EM 

DISOUETTE.l.DISQUETTE PROTEG *« HOME : FOR IG - 1 TO 

EE EN ECRITURE,4,FICHIER INC 5= PRINT DU*tIG): NE) 

ONNU, 12.FICHIER 1NC0NNU, 12 *°5 IF NOT (Til AND NOT 

255 DATA VOLUME DISOUETTE ERRONE VTAB 23: INVERSE : F 

,8,ERHEUR SUR DISOUETTE OU F CRITURE": NORMAL 

ICHIER,4,DISDUETTE PLEINE.6, 406 IF TI THEN VTAB 23; 

FICHIER VERROUILLE.IO : PRINT "INSERTION D - UNE NOT 

260 DATA 101,32, 127,32, 101,32, 1 E"l NORMAL 

27,32,1,64,114,64,127.192,15 407 IF TI. THEN VTAB 21: INVERSE 

2,"64,152, 128,192, 128, 171,192 I PRINT "CORRECTION D'UNE ND 

192, 152*64. 152, 12B, 127,128,1 410 VTAB ZO: INVERSE : PRINT "NO 

52,64,152,128,192,128,171,19 DU; HTAB 4: INVERSE : PRINT 

2,192,64 ">": NORMAL I WAIT - 16394, 

263 DATA 171,128,152,64,171,64,1 12BlX = PEEK ( - 16384) - 1 

92,192,228,64,228,126,255,12 29: POKE - 16369,0 

8,192,235,127,32,101,32,76,3 430 LA ■> 1 + 1 * (X - 13) + 2 * < 

,50,14,47,15,45,16,42,17,39, 14) - 1 « (X =■ 11 AND OU > 1 

18,37,9,35,6,33,22,127,42,12 ) + 13 * <X - 11 AND DU = 1) 

,50,90.46,85,3 

, 9E£E j^ ^£§3b rAINOg 



Is VTAB II - 20 * 



HTAB 38 - LEN I S' 
F(II,l>,MEtI),2))>> 
STR» (DU(«E(1I,3)>. 



IF C = O OR ME II 1, 2) - THEN 

IF (II / 20> - INT (II / 20 
) < > O THEN 792 
VTAB 23: INVERSE : PRINT "LE 
CTURE / <RETURN>-SUITE / F-F 
IN": NORMAL ; WAIT - 16384, 
12B:X - PEEK I - 16384) - 1 
28: POKE - 16368,01 IF X < 
> 13 AND X < > 70 THEN 7B5 



!(I0 * 1,2HM£<10,3> 



QUADRILETTE 




t»* 



A SUIVRE... 
FX702P 



DiSpOSees en Carre, 16 lettres en desordre VOUS Pour cela, vous agissez par carre de 4 lettres a la tois. Ces Ainsi, avec la version 1 on obtient tinalement: 

font un pied de nez... 



Mode d'emploi; 

II s'agit de remettre 16 lettres 

alphabetique: 

A B C D 

E F G H 

I J K L 

M N P 



Eric DUJARDIN 



carres sont numerates de la facon suivante: 
ABCD EFGH IJKL 
123 456 789 

M N O P 
es en carre, dans I'ordre Version 1 : Version 2: Version 3; 

E A B F F E 

F B A E B A 

Ainsi, jouer 1 fera changer I'ordre du carre. Selon les versions, il 
y a trois mouvements disponibles: deux rotations et ure permu- 
tation. Void le resultat de I'essai precedent, suivant les ver- 



E A C D 
F B G H 
IJKL 
M N O P 

II va sans dire, que quand vous jouerez, le carr6 initial ne sera 
pas dans I'ordre: en 4 coups vous auriez gagne. II y a trois jeux: 
avec QUADRIB, (en une seule ligne , sans espace entre les let- 
tres), avec QUADRIC on reprend la combinaison de depart pre- 
cedents et avec QUADRILETTRE (ou n'impofle quoi) le 702 ge- 
nere une combinaison aleatoire. 



a 



mv ie 

"■MOTE 

"POUR M8!D 

r/.-mr 

•smtmim 

mimm 

W "WSIOH ', 
D:WBIt:IFDi 
HIF HI THEN J 

a 

so- i :;■ 



I HP "JED ",*:«= 
8HF *="aURDRIB 

■ THEN 881 
i IF <=T THEN 8 
m 

i if s="emt!PiE" 

THEN 688 
i IF 1=T THEN 6 

1 «="... Mi 

TT8E....':6Si 3 



S8 f="9eCIiEF6HIJI!L 
MirsHF "HIVE 
W,l:m 6=1 T 
E!«=!H1 (»!l 

71 5SB IM-.Wtt 6: 
£NIIMt,«;F*« 
IK(9.«liHn 
(9,tMNII«Ii 

M 386 158: If I="8 
SCDEFBHUSXIHOP 



■ THEN 288 

IBB IF H=28e THEN 6 
88 

118 S8TC 88 

158 F8? B=l T« «Pf 
T CSP S!"="F:E 
S=-J TO 8:PF>T 
HID!PM»S,1!;" 

161 BEST S:FP.T SHE 
STCIHPf'"-'- 
tUSl 3B8:RET 



:88PRT"6bE«F "...E 

H"!«i" ESSfllS": 

S0T8 38 
'■■{ :=S: c OR 6=1 III 

2:6=E-3:fi=P,*f!B! 
(Si+SSH I "i'i 

NEKT C 

lie iF!'=!;fi; liit-s 

H.n*mi".«.!!: 
P«=BIC!a*5,l!tH 
•»»1,1) 

"8 :f ;=;: :, f=5'i'f 



t!,l!t9ID!fit5,l 

wMBe«>mii 

!8!Rt4,li 

-is if o=;:ii-=;i!i'P 

t5,1HIIB6W,1 

!:Fi=HiS(B*!,l) 

tRI8(«,l) 
358 IF (HI!=HHllie 

(3,2HP5iB!I' V 

:RET 
•ft F A=i!:;=5:5". 

,ie)tHt»=::-i:. 



2)«Pt:RET 
3?8 HW<t>MXM 

«II)(IH2,:'-*P>- 
»IS{8'6);REI 
518 IIIIT 38:F1R R=8 
TOE:FET ii c I 
8-R:«ID(19-R,i! 
!CSR MUKHt. 
Di 

528 -E'E CiFBT nil- 
11.1): PR* "E r E. 

"s»:iwrr ie;:pe 



T 
I Z!="«»tt":t=? 
tt"fflfflRIC"(2$: 
666 518:!=Et'FS 
t6ftH! 

8 688 !58:IF «='fl 
BECEF6HI«LWP 
" THEH 289 

i GOTO 628 

9 J=*«««!UF§RI 
8>»»i":S5B 51 
8:IHP "ESISHB 



S8H ',! 
) Et=BI8(I,«:Ft= 

H«!5,4):6*=»I[ 

(5,4):H)=!(I0I1! 

,4) 
) 658 156: IF «="« 

ECSEFeSHMWIP 

" THEH 288 
I IF H=2B8 THEH 6 



CROC EN POMME 



EXELVISKHt 



Laisseriez-vous une gentille petite souris se faire devo- 
rer par un vilain "ros minet". 
Non ! Alors a vos joysticks. 

Pierre Marie BERNEY 



ERRATUM DU NUMERO 66 POUR LE PROGRAMME 

EXELBLITZ 

LA LIGNE 164 EST FAUSSE 

164 DIM ASM 17) 



&EM ***.**.t..f *:.*..;.*-;.:.!.■{ i- j ; : •■ i = 

& REM *.-t.i*!_.RPX-EN-f ■!_!«***:* 

Ij PEN !«■«:** **.*.*«*******:*■ 

3 REM ECRIT PAR 

3 REN PIERRE-MARIE BERNEZ 

3 REM 3UR EXL 108. 

-i RE*' *t*f**.**.t.*-!f*-**..F.*.|-****- 

■i REN ■■'EU1LLEZ PATIENTLY: 

3 PE'" «-t.m.:t..r:**;t:*:f;.t .**•***** 

3 DIM TFK20.40) 

3 GOSUB £10 GOTO 290 

3 CLS "RbB" 

3 LOCATE Ctlf3) 

3 CRLL COLOR* "0RLHIF" ■ 

3 PRINT "WEEUUIILLLLEEZZ PPHHTT1 1EENNTTEERR" 

3 LOCATE <12,3J 

3 PRINT "VVEEUUIILLLLEEJJ PPflATTl i> ENNTTEERR" 

9 RETURN 

s pen **-f**sr**.-ms**0**&5 

3 REM DEFINITION DES i_APh:_ ' tf-i ;■ 

5 SEN M****.(:.?****S.i«:*S:*:t3 

3 CALL CHflRf l, , v jh iE,-'t. ? t.'l^ , «':iSDBt(' ,, J 

3 CALL CHARti. ■ ClE.'C /LH A24X163C3C" ? 

3 CALL CHBRO,- , ttr'E-;'F.Wjrrbji--. ■:■■;>:■;. ■ 

i CALL CHflS(1.-(i6n-:.'F.DWFL.-t^-'t:=!C3C"J 

3 CALL CHF* r I 

3 CALL CHfiRCt. ? "AAAAAAyyOft'i^SSFF " ; 

3 CALL CHflRC, ii^rjij(:FK.;--^.^'--:WFFoee0 H P 

3 CALL CHRR(a, , '6eErE7E718243CFFBAAA ,l .i 

■;i ■:"..: Cl-liW ■■ t^-L,":?:^:.*;^-:: 1 :.:' 

3 CALL CHHRdB, "FFC3C3C3FFFFC3CSC3FF" - 

:i REN ;.»yK:;Si?ja^»m* 

3 REN DEFINITIONS DES SONS 

3 REN ri' /.-*•«.:? **.?«)i*:**»!;.i:s= 

'■!'■■ i-^.-!-i ;:■;■■ 

3 S2*="3Fefl[)l806E?4FI21JLvi- ! .-..i=!-i -j.^^Hi - ; - >;i : i3 L?Ck. : .y4K. : ;..:v-:,: V- — . --".A;;i IBDe~8442D" 
J 33K= " 603 1 &&5j=<[ i 2 ". ■- fH=:.; ■ ::. =1 ■-..! i : ; i.-^f ■* 

3 Rl»*"0E6B3FCr"'!i:!t-.r»^'J-: : OF "■*■': :;:jt: liBfi-iuMsiC' : .''ii'i i s^'-;.-'^ ■' Pr:B300£FE" 

■ ii;.-";);::::E:iV:!:"B^:rc- 

3 T2«=-eD?C91B26RB602FC M 

3 B0«="H43624233C92BeC':0;-.: 1 U^-V, -J. T= :-"■:■ I- e= =,-=_- _ l^.;;«LA i, -«!■ t\M :'->:. -s^r-f^i J151A95" 

3 KEn=5ews8 £H*=eO« ■ G03UB 789 

-■:;; «2£7?599C " 
3 SHS^EIW GOSUB 870 

■!>■■■■■ ■ ■ ■ :.-.:■-■.:■.■ -.u.'i.^H:^ j :-^-;s4<tf«fi9Bi=i" 

3 SHl=eJSCOSUB 870 

El>-H51*5£5AEF7W 
3 SH»"8U«G03UB 870 

■ ■, . . 
3 Swj=Bfi« C0SUB B70 

3 BW*"Sl'BaS*6K2fl4^6C25BZ8e634640Befi50B883HePFF0I" 
3 SHJ=BS1 ■ GOSUB 370 

. i ,, ■■ . . ,.l! ■■■■.. .;:[■.[,.; 

3 MEM=5088B SH»=BO* GOSUB . T >ia 

3 BN«="B9334DA5A17BEB56256762658B4ff 1DA258446E715L « IflES ID At -; 

3 SH<=6N1 GOSUB B70 

J BJ«="D77RS3HF(El[3B5.'"Ji)HjP.v: . ;■ .,' ;<i , ,| : ,-., !■■„.■■:.■:■.,!: ■ ■ . 66009692" 

3 SH«=BJ* GOSUB 870 

3 BU»-"00815395RH500t'a4_'4H'iL^E:£?C.::-4L-jfi;L.^i-.',.:.v : - ir v.;',.|, i -.;o| C ,- l ; ? .. -:,t:'r,7sce626" 

3 3H«=BU« GOSUB B70 

> BR»--'^305inB3Bfil6St4D7CCCSaFlB??B639DlAyAD4tL4344e27i6e3J7RBE!&!'4EACC&2" 

) sh«-br» gosub ere 

3 B5«-"647C5eAR2R4EfilFl:: ) -:'iE4:j> 1 M t :I.':.^"r^. :, .U^l^i:ii':L':'-j..:r^: .:,;:— ^>iFSR36^67■ , 
3 SH«=BS* GOSUE: SF'tf 
3 BT*="6BflBC--:3E^i-:.--iL-.-:Di.:::::!i':jFFFF8l'' 
(=BT« GOSUB 670 



■ : -b'3 OOTCi 1070 

770 REM t.XZXXmtXX**W*XX**X* 

780 REN ROUTINE ASSEMBLEUR 

790 REM ***:m* ft*** ****..? *•**■( 

B00 RESTORE 

810 FOR 1=1 TO II 

320 READ SP CALL POKE" HEN , SPJ 

{...:..! :.ri-N=NE'1*l 

849 NEXT I 

850 DATA I52,?3, 13, li8, 11, 13-121, $,3,251, 
360 REN rf**r.rt:fii.*-r.t:t.S.f4r*ti- 

870 REM CODEi -tXf.CE'Tl'iAL^ EN CODES DECU 
880 REN W***********'***-*.?-*.:..* 
3'Ju -H=LEM^3H*f 

909 for 1 = 1 to sh step 2 ■ res=b 

910 sr5=seg*<sh*,i.i> 

■JiO IF >-..,"£.R:r'F [ : !S -, i _i THEM SP=VAL(SP*" 1 

ELSE COSUfc 1019 
■3'1'i PES^SR-tHE. j'Hl 
340 SR?r.=SECS<SN*. .1,1 > 
950 IF NUMERIC^ SRS >=~1 THEN SF=VAI.< SP* 

ELSE GOSUB 1010 
950 PES=RE5*SR 
?.vi CALL r.;:». f-- '■ieh . fiES ) 
■;j;j:U "ETW1EM+1 
938 NEXT I 
1900 RETURN 

1910 IF :>fi*="fl"THEM SR=10RETMRN 
1320 IF SR3 = "="»L'i :■:.[=--!! RETURN 

hSjC if srs= >: then sp-ij? return 

1040 IF ERS= 'l; TH£!. ■ip^l? PE'UR'H 

1059 IF :-S= E THEN '-Psl4 RETURN 

136B IF 3RS= F THEN -.P- i "1 PL T ' Rf: 

1070 REM miiiil-CStiU^Nff 

iOPO '-EM 'ITRE 

1030 REM *#:r*ttf**m.m::*:*;m* 

[10O C'_l "VBB1' 

1110 CALL CDLDR< "0VEIF" ) 

1120 FOP 1=2 TO 39 

Ii33 LOCATE 2 ] ) PRINT '-HPS! , 35 , i 

1140 CKHTE '..: ! > PRINT CHPS<?35 

1150 LO'.fiTf :■],!:. PRINT ,.HR*(.36> 

n-io i <y fm ■ ..■' : ■ i-pint (..hps: .?« * 
ii;'o next i 

1130 FOR 1=2 TO El 
1lyu LrXi=' T t ■I.^.i print CMR9C35> 
1^:00 L0'..1-E '■ 1 ;:, F-PIHT :.Mi,'$. .'i ■ 
1218 UKRTE 1 .:- PRINT '.Nk-S. :;-, . 

lj^'O LOviiiE : :.■::> print i.-hr«35) 

1238 NEXT 1 

1240 CALL EXEC 50688 ■■ 

1250 PAUSE 2 

1260 (.(-ILL : 'JL UF ■ OPE' ■ 

1JT0 LOCATE vS,?? 

1280 PRINT "JJEE MM-'flflF'PPPEELLLLEE" 

1298 CALL EXE 1^50886 . 

1^:00 CFiLL CiJLdR. ■'OiiHLI") 

1310 LOCATE (12.6) 

1326 PRINT "CCPROOCC" 

1330 LOCATE •- 13,5> 

1J40 PRINT •■<■,CtiRQO'ZZ•^ 

1350 LOCATE '1218; 

1J60 PRINT '■EENN" 

13?0 LOCNTE < 13.191 

1380 PRINT "EENN" 

1390 LOCATE '"12,26) 




NT "PPOriii'-iMNEE " 
LOCATE <13-26> 
PRINT "PPOOHlfflraEE" 
PAUSE 2 

i) PRI.i. SPEECH-. "P v i&y-.J-KZ3*y 
PROSE 4 

CfiLL SPEECH' "O, i; i-i S!;' : .25!,S3S} 
O PEN .pt*:(:*.rf!t(ttT*t**:*t.t* 
9 REM PEGLES 

3 CLS "ueB" 

•3 CALL r-OLOR' • lUB" i 
3 LOCATE ?2,12> 
3 PRINT "CROC EN POMME" 
3 I.UCRTE '6.6:. 

3 PRINT "VOU? E'E-i UNE SOURIS 1 ' -CHRS*. 1 J 
3 LOCATE '8,e> 

3 PRINT "UN GROS NINE' '■ . CNR*' 3 >, " VOUS PQURSUIT." 
3 LOCATE i 10,3> 

3 PRINT "LE BUT !■■.: jfj.: EST DE NRNGEP LE PLUS " 
3 PRINT "D£ PONMES RO-.-,: B- ES ' 1. hp$.; 5 > . " AVANT D'ETRE 
MANGE" 

PRINT " 

PRINT " LA SOUP I v SE I'tRLAi.E A LHIDE DE LA » 
F'RINT "MSNETTE DE JEW; DOnt i.es PAiiSSOIRS DE " 
G PRINT "TIP SOHT ORANGES." 



' 25 POJ i 



3 PRINT "POINTS" 

3 LOCATE (29, 1 ) 

3 CALL COLORf "IT- 

3 PRINT CHRS"5/. 

3 LOCATE (20.15; 

3 CRLL CC'LORC'lbWF" ) 

3 PRINT CHRI'5 >. 50 POINTS" 

J LOCATE <■ £0,28.1 

3 CALL COLOR' "1MNF"> 

3 PRINT CNR*' 5), " 75 POINTS 1 ' 

3 LOCATE • 22.10> 

3 CALL COLQRt "1HB") 

~ -'RINT "PIEGE ",CHRSC6 ■ 



1810 
1820 

1330 



. "«St«liSS*ft$3#? 



PAUSE 6 

CALL SPEECH! "I 

PAUSE 4 

CALL SPELCAi -A '■SSlis-SlVK'-C.jS ■ 
J REM -t:*-t::i;-if:t:-t:-S:-i-i.-**4.*«*S** 
3 REM CHOIX 

1 PEI-1 -i-+:-tf i--l.ft::i:t;.'.M-t:fj;***** 
3 CLS "WeB" 
■1 CALL COLOR' "IUB" J 
3 LOCATE 'Z,14> 
3 print -r-Rnr fii F'OMME" 



i LOCATE ■ 8.1 > 

3 PRINT ■ 1 *-,'Oi.H E.7 - .'::■'.!■-■ UN r.AEPI- CANS I.COOEL VOTRE ' 

;i ppinr "SOUPIS ME ^OURPf-i pa? fi.iipe.C0.--N3 " 

3 REP*aKSf» 

I J> REP«<>"D"HHD REKS- -!l"i1ILtl 1'.':;:'.' 
3 IF REP5="0"TH£JI >..i^l? 




JEEP LUNAIRE 



ZX.81 



Que diriez-vous d'une balade en JEEP dans un milieu nes par GOTO 3000. Le but du jeu est de s'enttjncer ie plus poss^- 

Stranger parfaitement host.le. Heureusement que votre ^ aSl^^uSl^^SS: '" ** raPPU " * 

engin est bien arme... (la Jeep !) 1 pour abattre le va]Sseau du ba s 

Bruno PACCOUD 4 pour abaftre le vaisseau du haut. 

Mode demploi; pour tirer horizonlalement 

Creer une ligne REM de 206 Octets et rentrez vos codes machi- En fin de partie, aflichage du score et possibihte de rejouer 



ECAITURff EN L-IOEO NORMflLE DES 
CARACTERES EI^ UIDEti INMER5eE 

LIGNE CRRACTERES. 



35 136 lis SS4 346 32 24S It 
347 S<t>l 4.S IS 6* £35 '-.!] J.i 
64 £7 £17 & £3 £17 19 13 

-:■:■. o ;■!-■ 
15 si? 16 £41 "■- ■"-• 

Lkd G 1-33 i£6 — ..-. - - 

123 1S8 J.S8 1£B 139 2_ , 

iaa 123 ias iae iae 123 isa 133 

123 133 1S6 138 128 126 123 a 
2 a 133 136 133 123 12S 123 
123 133 128 128 123 3 128 « 
123 lSB 128 5 123 128 128 1£8 
138 138 128 5 128 138 1£8 
130 5 133 134 6 7 131 13a 
2 S 126 128 126 135 
130 131 132 5 131 123 2 4 
7 131 132 S 133 123 13S 
138 5 133 133 5 5 128 133 
133 4 12§ 133 126 128 128 



13.3 5 



> 5 126 13S 13.: iHs 



128 138 128 <H 
134 130 3 f 



130 3 129 5 128 130 



163$3+256fPEEN. ^.a0 LET 



9 LET PRiPI 
1639S 

:.b 'Vosue 4-B 

15 FOR 1-0 TO 3 

30 PRINT r" " 
69 + IJ iflT 3, 
.AT 4, I, CURB . — 
.I.CHRt PEEM 116853 
Rt PEEK 116688+IJ 

30 NEXT I 

35 IF INKFTi""" THEN SOTO 35 

40 GOTO 65 



,)23 TNEN LET 



2,I,CMR« PEEK 1165 
1 " L - PEEK I If"" ' 



489 LET XXi> 

490 PRINT AT 

■■jTfle 4, " 

495 LET fi = l« 
500 RANO U5F 



ii«'J! ! 




1230 LET &C"SC 



1270 GOTO 1320 
1380 FOR 1=15 
1305 LET HM=RQ 
-.310 LET it. 



Ib6 THEN GOi 13SS 
K120 THEN " r "' : " 
1*120 THEN 





1325 POKE > 



'.::,:;■:, C'j'C - ■■.:-; 

:;■::■;■. n-sr-0 'J5R 1651^. 
13S1 RANO u&R 15514, 
PRINT "■ : 



MJ 01 



I ■;■. £0:"a IF uIE'iO then (SOTO 105 
.3 u iiao FOR 1=1 TO 15 
1,9, Slfl PLOT 6tI,S+I 



1370 LET XX=26 

1372 LET L = -L 

1375 GOTO 1330 _ k _„ 

1400 IF VI. 03 THEN GOSue 1150 

1410 IF UiX/2 ANl> C'lX/4 THEN PI 

1420 1= RNDJ1.08-X THEN PRIfJT i 



It" 



1450 RETURN 



212S UNPlOT 8,3-fI 

2135 UNPlOT 6+I.6+I 

2140 UNPLOT 3-1. 7+1 

3145 UNPLOT 3+1, B+I 

;,:.-,:■■ NEXT I 

2155 FOR U=B TO 50 

£160 NEXT L> 

im mm v 

■PATROL 



■->:■ ■,0SuB 45 

96 LET K=l 

99 LET L=l\ 

.ct let i j.n = ;i ■■ ■ j.'-i-,:;-. ',-.- o i 

iOE. ':>oro 113+ivOj tir.ij 

ilij LET ,!=PNO.^ 

115 IF U:.l TNEN 004UB 1400 

300 GOTO 4,08 + &i30*i IN1--E- *= 1 

••: liNKI:.-. i- -I- ■ 

70 PRINT FIT rY..vA, "BB1" 

7S If V¥(3 OR Vv >6 THEN LET 




-:i:cti -■:.- :: - ... ' ."■■ c- 
:■■'■■. ■■■NO U5R 165: 
2002 NEXT I 

2004 PRINT AT A, 4; 
",flT A +3. J. 

2005 PRINT AT 15,4. 
p£ ,flT 17,4, ■•111 

Tat 19.5; O*" 

2Slwi F,]R 1 = 1 TO 7 

i ■;!■=■ NEXT I 

2020 PRINT AT 15. 4 



T'.,1-':.li ■ 

POKE I. 

3030 SCROLL 

3Q50 NEXT I 



MARS LANDING 



Calme et habilet6 SOtlt de rigueur pour ce sport trds Les 3 fleches LFH 1 « > ou la poignee permellent de dinger 

particulier qu'est I'atterrissaqe en moindre apesanteur. votre vaisseau. Le but du jeu est de se poser sur ies zones plates 

Ajouter a cela, un terrain plus qu'accidente, vous ima- ^ lt | rrivant avec une vitesse maxi ™ m ^pendant du niveau de ditfi- 

ginez la prouesse... Vous disposez au depart de 9999 unites de fuel et de 3 vaisseaux 

Roland MORLA Apres un CRASH tapez une touche pour obtenir un nouveau vais- 

Mode d'emDloi seau En tin de partie, tapez 1, 2, 3 ou 4 suivant le niveau choisi 

En page de presentation, les touches flechees vous permettent de pojr la Dartie suivante - 
changer le niveau et de choisir entre le STICK{1) ou le controle au 
clavier. 




MARS LANDING 



PAR ROLAND MORLA 



'DES EN 



[ERS PUR AL 



100 ' 

LO DEFINT 

ER PLUS VITE 
120 OPEN "GRP: " FOR OUTPUT AS #1 

.30 s=o:xi=o: yi=o: vy=o:vx=o:g=o:x= 

=o:c=o:e=o:ci=o 
l40 0ninterval=100 gosub 190160sub 

370 

50 GOSUB 1360 

60 c=999?:ci=c: sc=o: intervalon:so 
sub 20o:sc*="oooo n :sm=i 

70 GOSUB 310:G0T0 210 

AFFICHAGE PERIODIQUE DU NIVEA 

FUEL 

FC=C1THENRETURN 

DL0R5:PSET (205,55) , 5: PR INT* 1, 

=C:C0LOR15:PSET (205,55) ,5: PR I 

CI RETURN 
IV=4 

220 INTERVAL OFF : C0L0R15: IF NV=4TH 
EN DRAW "BM225, 110" : PRINTttl , NV- 1 
230 DRAW"EM225, 110 ": COLORS: PRINTttl 
,NV 



260 INTERVAL ON 

270 IF NV=0' THEN 2010 

280 IF C<=0 THEN 2010 

290 X=800:Y=100 

300 VX=1D:VY=10 

310 IF ND<20 THEN VX=30:VY=30 

320 ' 

330 ' 

340 'BOUCLE PRICIPALE 

350 ' 

370 S=STICK(E1 : PUTSPRITE10, (X,209) 

: IFC<OTHENC=0:GOT0420 

380 IFS > 1 ANDS< 5THENVX=VX + 1 : C=C-1 : S 

0UND13, 15 

390 IFS>5THENVX=VX-1 : C=C-1 : SOUND 13 

400 IFSO1AND5O2AND5O8THEN420 
410 VY=VY-5:C=C-5:S=-l:S0UND13, 15 

4Z0 vy=vy+g:x=x+vx: y=y+vy:xi=x/5o: 

Yl=Y/50: IFS=-1THENPUTSPRITE10, (XI, 
Yl+S) ,11,3 

430 PUTSPRITE1, (XI, Yl! 
1THENPUTSPRITE10, (XI," 
440 IFX>100000RX<OORY- 
450 ' 

460 'LE LEM A-T-IL TOUCHE LE SOL ? 
470 ' 

480 IFP0INT(X1+7,Y1+B)< >14ANDP0INT 
(XI, Y1 + 3X >14ANDP0INT(Xl+3, Yl+8) < > 
14THEN370 
490 ' 

500 "SI OUI,EST-CE SUR UNE ZONE D' 
ATTERISSASE 7 



, 15,26: IFS=- 
1+8) ,8,3 
=0THEN290 



520 IF ) 
3 THENSJ 
530 IF > 
5THENSI= 
540 IF > 

THEN51* 
550 II 

THENSJ.) 
560 ' 



>=40 AND Xl<=57 AND Yl=16 

10:GOT0630 

>=S2 AND Xl<=90 AND Yl=13 

OIGOTO 630 

> = 119AND XK=130AND Yl = 16 
20: GOTO 630 

> = I53AND XK=157AND Yl = 16 
100!GOT0630 



C'EST LE CHRASH 
580 * 

590 GOSUB 2260: GOTO 220 
600 ' 

•ON EST BIEN SUR UNE ZONE D'AT 
TERISSAGE.MAIS IL FAUT TESTER LA V 
ITESSE D' IMPACT 
620 ' 

630 IFSQR(VX*VX+VY*VY) >NDTHEN005UB 
2260:GOT0220 
640 ' 

650 'ATTERI5SA0E REUSSI.ON MET LE 
SCORE A JOUR 
660 ' 

670 PUT SPRITE 10, (X, 209) 
6S0 INTERVAL OFF 

I COLOR 5:DRAW "BM213,20".-PRINTtt 

1 ,sc$ 

700 SC=SC+S1!IF S09999THEN SC = 999 



710 IF SO = 1000THEN SC¥=RIGHT* (STR 
SISC1 ,LEN(STR5(SC) ) -1) : GOTO 740 
720 IF 5O = 100TH£N SCS= "O" +RIGHTS ( 
STRSiSC) , LEN(STRSISC) ) -1 ) : GOT0740 
730 IF SO = 10THEN SCS=" 00" +RIGHTS ( 
STR*(SC) , LEN(STRS(SC) 1 -1 ) 
740 C0L0R15:DRAU "BM213,20":PRINT*t 

1, scsi if so = 1000*sm then c = c + 2000 

:sm=sm+i 
750 if c>9979thenc=999? 
760 s0und7,&b11 1000: play "04l64cde 

FGAB" 

770 FOR 1=1 T0900;NEXTI:G0SUBS10: I 

NTERVAL ON: SOTO 290 

780 ' 

790 'INITIALISATION DU GENERATEUR 

DE BRUIT 

800 ' 

810 SOUND 11,99: SOUND 12,1:SDUND 6 

,ioo:sound 7,0:SOUND 10,16:RETURN 

S20 ' 

330 ' 

840 'PRESENTATION 

850 ' 

860 ' 

870 cls:key off 
sso screen ! col0r15 , 8, 8 
b90 locate 12, 2, o 
900 print"mars landing" 
910 locateio,5:x=i:c=i 
920 PRINT"Par Roland Marls" 
930 LOCATE 3, 15 : PRINT " NIVEAU DE DI 
FFICULTE": LOCATE 34, 15 : P'RINTX : LOCA 
TE 30,15:PRINT"->" 
940 LOCATE 3,1S:A*="C" 

950 PRINT'XLAVIER OU POIGNEE ": LOCA 
TE35, lSIPRINTA* 
960 SC$=INKEY* 

970 IF SCSOCHRSI301THEN 1020 
980 C=C+l:lF C>2 THEN C=l 
990 IF C=l THEN LOCATE 30,18:PRINT 
- -! LOCATE 30,lSfPRINT u ->° 
100O IF C=2 THEN LOCATE 30,15:PRIN 
T" ":LOCATE 30, 18:PRINT"->" 
1010 GOTO 960 

1020 If SC*< >CHR*(31 ) THEN 107O 
■1030 C=C-l:lF C<1 THEN C=2 
1040 IF C = l THEN LOCATE 30,1S:PRIN 
T" "ILDCATE 30, 15:PRINT"->" 
1050 IF C=2 THEN LOCATE 30,15:PRIN 
T' "ILDCATE 30, 18:PRINT"->° 
1060 GOTO 960 

1070 IF SCI=CHR$(28) THEN 1110 
1080 IF SCS=CHRS(29) THEN 1160 
1090 IF SCS=CHR*(13) THEN 1210 
1100 GOTO 960 
1110 IFCOl THEN1140 
1120 X=X+l:lF X>4 THEN X=l 
1130 LOCATE 30,18:PRINT" ":LOCATE 

30, 15: PRINT"-) ": LOCATE 34, 15: PR IN 
TXIGOTO 960 

1140 IF C=2 THEN IF AS="C" THEN A* 
="P" ELSE AS="C" 
1150 LOCATE 30,15:PRINT" ": LOCATE 

30, 18:PRINT"->" :"LQCATE 35, 18:PRIN 
TA*:GOTO 960 
1160 IFCOl THEN114G 
1170 X=X-1:IF X<1 THEN X=4 
1180 LOCATE 30,18:PRINT" ": LOCATE 

30, 15! PRINT" ->": LOCATE 34, 15:PRIN 
TX:GOTO 960 

1190 IF C=2 THEN IF A*="C" THEN A* 
="P" ELSE A*="C" 
1200 LOCATE 30,15:PRINT" "; LOCATE 

30, 18:PRINT"->" : LOCATE 35, 18:PRIN 
TA*!GOTO 960 

1210' IF A*="C" THEN E=OELSE E = l 
1220 A*=" " 
1230 ' 

1240 'LA GRAVITE ET LA VITESSE D'l 
MPACT MAXIMUM DEPENDENT DU NIVEAU 
DE 3EU 
1250 ' 

1260 IF X=1THEN ND=30:G=1 
1270 IF X=2 THEN ND=20:G=1 
1280 IF X=3 THEN ND=15:G=2 
1290 IF X=4 THEN ND=1S:G=3 
1300 RETURN 
1310 ' 
1320 ' 

1330 'DESSIN DU FOND 
1340 ' 
1350 ' 

1360 COLOR 15, 1 , 1 
1370 SCREEN 2,0,0 
1380 GOSUB 2160 
1390 SPRITE*(26)=A* 
1400 SPRITES(2)«AS 



1410 LINE (201,0) - (201, 191) ,5 

1420 PAINT(210,0) ,5 

1430 LINE (200,0)- (200, 191) , 15 

1440 LINE (199,0)- (199, 191) , 15 

1450 LINE (199,0)- (255,0) , 15:LINE( 

199, 1)- (255, 1 ) , 15 

1460 LINE (199, 191) -(255, 191) , 15:L 

INE( 199, 190)- (255, 190) ,15 

1470 LINE (255,2) -(255, 189) ,5!LINE 

(254,2) - (254, 189) , 15 

1480 ' 

1490 'DESSIN DES ETOILES 

1500 ' 

1510 FOR N=l TO 130 

1520 X=RND(1)*I95: Y=RNDU>*160 

1530 PSET (X, Y) , 1HNEXT 

1540 ' 

1550 ' DESSIN DES PLANETES 

1560 ' 

1570 R!=3. 141593H/130 

1580 CIRCLE (150,30) , 15,8 

1590 PAINT (150,301,8 

1600 CIRCLE (40, SO) , 10, 11,R!*1Q0,R 

!*265, 1 

1610 CIRCLE (50,80) , 15, 11,R!#140,R 

!*225, 1 

1620 PAINT (33,80) , 1.1 

1630 DRAW "BM210, 10 ": PRINTttl , "Star 

1640 DRAW "BM213,40" : PRINTttl, "Fuel 

1650 DRAW ,, BM213,20" : PRINTttl, " OOOO 

1660 DRAW "BMZ06, 75": PRINTttl, "Nive 

1670 COLOR 14 

1680 LINE (0, 130) -(5, 140) 

1690 FOR 1=1 TO 60 

1700 READ X,Y 

1710 LINE -STEP(X,Y) 

1720 NEXT 

1730 LINE-STEP(0, 100) 

1740 PAINT (180,170), 14 

1750 PAINT (30,1701,14 

1760 C0L0R15 

1770 LINE ( 197,90)-<199, 191) , 15 

17SO COLOR4 

1790 DRAW "BM37, 175" IPRINTttl, 10 

1800 DRAW "BM76, 14S" : PRINTttl, 30 

1310 DRAW "BM112, 132" :PRINTttl,20 

1820 DRAW "BM141, 175" :PRINTttl, 100 

1330 F0RJ=4TO7 

1340 A*=" ":GOSUB 2160:SPRITE*( J)=A 

1350 NEXT 

i860 PUT SPRITE 2,(215,1091,15,2 

1870 A$=" ":GOSUB 2160: SPRITE* ( 3) =A 

1380 PSET (144, 152) , 1!PSET(145, 120 

1 , lJPSET (72, 151) , 1 

1890 COLOR 15 

1900 DRAW "BM215,90" 

1910 IF G=3 THEN PRINTttl, 4 

1920 IF G=2 THEN PRINTttl, 3 

1930 IF ND=30 THEN PRINTttl,! 

1940 IF ND=20 THEN PRINTttl, 2 

1950 RETURN 

1960 ' 

1970 ' 

1980 'FIN DU JEU 

1990 ' 

2000 ' 

2010 INTERVAL OFF 

2020 COLOR 8:DRAW -BM213,160-:PRIN 

Tttl, "SAME" 

2030 COLORS: DRAW "BM213, 170":PRIN 

Tttl, "OVER" 

2040 XS=INPUT*( 1) ! IF X*<>"1"ANDX*< 

>"2"AND X9K>"3"AND XSO"4"THEN 204 



2050 COLORS: DRAW "BMZ1 3, 160" IPRINTtt 

1, "OAME" : COLORS: DRAW "BM2I 3, 170": PR 

INTttl, "OVER* 

2O60 COLORS : DRAW "BM205, 55"; PR INTttl 

,C1 

2070 X=VAL(X«) IGOSUB 1900:GOSUB 12 

60:COL0R15:GOSUB 1900 

2080 C0L0R5:DRAW "BM213,20":PRINTtt 

1 , SC* 

2090 COL0R15:DRAW"BM213,20":PRINTtt 

1, "0000" 

GOTO 160 



'DESSIN DE L'EXPLOSION 



:next 



2180 A*=A*+CHR*(VAL("&B" 

2190 NEXT N 

2200 RETURN 

2210 ' 

2220 ' 

2230 'D 

2240 ' 

2250 ' 

2260 INTERVAL OFF 

2270 PUT SPRITE1, (XI, 209) IPUTSPRIT 

E10, 1X1,209) 

2230 SOUND 12, 40: S0UND6, 240 ! SOUND 

13,9 

2290 FOR J=ITO 20 

2300 PUT SPRITE27, (XI, YD ,8,4 

2310 PUT SPRITE 28, (XI , Yl +8) , 1 1 , 5 

2320 PUT SPRITE 29, (XI +8, Yl ) , 1 1 , 6 

2330 PUT SPRITE 30, (XI +8, Yl +8) , 8, 7 

2340 FOR i=itoio:next 

2350 PUT SPRITE 28, (XI , Yl +8) , 3, 5 

2360 PUT SPRITE 29, ( XI +8 , ,Y1 1 , 8 , 6 

2370 PUT SPRITE 30, ( XI +8, Yl +3) , 1 1 , 

7 

2380 PUT SPRITE27, (XI, Yl 1 , 11,4 

2390 FOR I=lT010lNEXT 

2400 NEXT 

2410 FOR I=27T030 

2420 PUT SPRITEI, (XI, 209) 

2430 F0RI=1T0 20:NEXT 

2440 SOUND 7,&BlllO00 

2450 PLAY "L64T120CR64CR64C64R64CR 

64DttR64DR64DR64CR64C03R64B04R64C" 

2460 IF NV<MTHENAX*=INPUT*( 1) 

2470 FORI=1T01600:NEXTI:GOSUB 310 

2480 INTERVAL ON 

2490 RETURN 

2500 ' 

2510 ' 

2520 'SPRITE DU LEM 

2530 ' 

2540 ' 

2550 DATA 00111000 

2560 DATA 0I1O1I0O 

2570 DATA 01010100 

2580 DATA OlllllOO 

2590 DATA OIOIOIOO 

2600 DATA 1O010O1O 

2610 DATA 10010010 

2620 DATA 00000000 

2630 ' 

2640 ' 

2650 'DATA DU TERRAIN 

2660 ' 

2670 ' 

2630 DATA 2,2,4,-4,3,7,1,6,2,1,1,; 

,2,0,6,6,0,-7,2,8,3,-3,2,7,5,2,2,2 

,24,0,1 

2690 DATA 2,7,8,- 

16,0, 1,-2, 1,2,3, -6 

2700 DATA 5,23,1,-5,1,9,2,2,2,5,1, 

4,6,2, 17,0, 1,4,4,-8,4,-12, 1,2,0, -4 

5, 1,0, 0,45, 0,-45, 1,0, 0,45, 0,-45, 2, 

33,0,4, 1,4, 1,2,0,6, 12,0,. 



-21,0,4,5, 



-4,4,-17,5,-25,5,-25,4 



'120 



'INITIALISATION DES SPRITES 



, -2,0 
,3, -9 

2710 DATA 5 ; 
, -10,6, 15 

2720 ' 

2730 ' 

2740 'SPRITES DE L'EXPLOSION 

2750 ' 

2760 ' 

2770 DATA 00000000 

2780 DATA 00000001 

2790 DATA 00000010 

2800 DATA 00000010 

2810 DATA 01000110 

2820 DATA 01110110 

2830 DATA 00011111 

2840 DATA 00001111 

2850 ' 

2860 DATA 00001111 

2970 DATA 00010111 

2880 DATA OO1O0111 

2890 DATA 01001101 

2900 DATA 10001000 

2910 DATA 00001000 

2720 DATA 00010000 

2730 DATA 00000000 

2940 ' 

2950 DATA 00000010 

2760 DATA 00000100 

2970 DATA 00001000 

2980 DATA 00110000 

2990 DATA 01110000 

3OO0 DATA 11100000 

3010 DATA 11000000 

3020 DATA 10000011 



C'est nouveau, qa vient de sortir 



BIDOUILLE GRENOUILLE 



Janine etait desesperee Apres lui 
avoir declare sa flamme quinze 
jours auparavant. et etre parvenu 
a ses fins 6 combien honteuses, 
Lurgi I'avail deiaissee comme si 
elle n'avait jamais exists pour lui. 
Cerles, son nez n'etail pas des 
plus droits, bien sur, ses robes 
ne venaient pas des tailleurs les 
plus reputes, mais etait-ce une 
raison pour que Luigi se borne a 
I'utiliser pour son egoi'ste plaisir 
personnel? Les images du peu de 
temps qu elle avait passe avec lui 
deficient dans sa tele Quelle er- 
reur n'avait-elle pas tait en lui 
donnant. dans loute sa naivete 
les solutions des quatres premie- 
res enigmes d'Eureka! Mais il 
fitait si oeau, dans son costume 
d'ange Noir, cette tameuse nuit... 
Elle lui avait dit que pour acceder 
au cinquieme jeu, le cri pousse 
par le petit dinosaure est "Meep 
meep". que le nom de I'empereur 
Remain est 'Neron*. que le nom 
du Sire felon neveu du roi Arthur 
est "Mordred" el que le titre du 
disque est 'Anvil chorus*. Elle lui 
avait meme note sur un coin de 
nappe de son Scriture menue les 
details sulvants: 

'Grace a ces noms, mon amour, 
tu pourras entrer dans I'aventure 
Caralbes. Je peun meme te don- 
ner certains conseils pour bien 
demarrer le jeu: dans I'avion. 
'prendre parachute' puis 'sau- 
ter". Puis, sur la falalse, "bas". et 
tu trouveras le coutelas, le dou- 
blon et le crane. Pour tuer la pan- 
there, il suffit de "tuer panthere". 
N'oublie pas de 'porter cas- 
quette' qui est dans la tour de 
controle. Pour passer la haute 
cloture electrifiee, 'utiliser para- 
chute* et "haut*. II taul ensuite 
'lancer carcasse' de la panthere 
dans la piscine, puis 'bas'. Pour 
entrer dans la maison. 'utiliser 
ruban', Dans la foret luxuriante, 
tais 'examiner pyramtde', puis 
une fois a I'interieur, surtout, ne 
prends pas le dlamant! Fais 'exa- 
miner statue', et contente-toi de 
la prendre. Note aussi que dans la 
tiQioiomo Qvonturo. il y a une 
faute d'orthographe: il ne (aut pas 
ecrire 'carotte' mais 'carrotte'. 
Luigi avait empocne le papier 
sans mot dire. II paraissait tour- 
mente. ce soir-la, et de plus il 



sembiait un peu trop attire au 
gout de Janine par une blonde 
plantureuse qui lui jetait des re- 
gards salaces a trois tables de la 
(■or. 

Le lendemain, c etait la rupture 
Deux lettres etaient parvenues a 
Janine: I'une lui annoncant le de- 
part de Luigi pour Mexico avec 
Barbara, sa rivale de toujours, et 
I'autre qui sembiait 6tre une er- 
reur. Elle etait adressSe a un cer- 
tain Eric Marteau. 
*Cher Eric, 

J'ai des bidouilles pour ton Spec- 
trum. N'as-tu jamais rgve de re- 
copier ce superbe simulateur de 
vol, "Fighter pilot"? Eh bien, 
tiens-toi bien et ouvre grand tes 



provenance de lordinateur. Si il 
dure plus de 4 ait 5 secondes, 
fais un Break vigoureux. stoppe la 
cassette, remets la tienne en en- 
registrement et lais Run. Meme si 
hen n'apparait sur lecran. ton 
programme sera sauvegarde. 
Derniere chose: dans le pro- 
gramme anti-cafe d'Hebdogiciel 
numero 65, deux lignes etaient 
erronees. Les voici: 



130 IF TYPE"! OR TYPE-2 THEN 
PRINT INVERSE li'UARIABLES I" 
jiPRINT* •trjHR»(PEEK<lX<14> 

-32-i4»PEEK(IX*M)»l?2) >*(■»■ 
AND TYPE-2)lG0 TO 160 
200 QO TO 30 




yeux. car j'ai une maniere fiable a 
100% pour te copier de ton Spec- 
trum prefere a ton magnetophone 
prefere. 

Mets I'original dans ton magneto 
et charge le programme. II doit 
appara"tre: "Program: FP'. Des 
que cette inscription s'efface, ap- 
puie assez longtemps sur Break, 
prends une cassette vierge et lals 
Save "FP" line 0'. N'oublie pas 
de mettre ton magnetophone en 
marche. Ceci tait. sans rembobi- 
nc> la cassette, insere I'original. 
tais Run et mets le magneto en 
lecture Le programme suivant 
doit charger. Ouvre bien tes oreil- 
les et guette un sifflement contlnu 
bien distinct du bruit normal en 



En ce qui me conceme, je t'avais 
confic mon intention de laisser 
tomber Janine une fois qu'elle 
m'aurait donne la solution de Eu- 
reka, c'est fait: |e lui ai envoye 
une lettre de rupture, en lui disant 
que je partais au Mexique. C'est 
faux, bien entendu, j'habite tou- 
jours a Menilmontant et si tu 
n'arrives pas a me joindre, tu 
peux me laisser un message a 
Pepe Louis, il me transmettra.' 
Janine connaissait bien Pepe 
Louis, puisqu'ii avait eu I'occa- 
slon de la tirer d'atfaire dans 
I'histoire du gang des macnines a 
laver (1). Aussit6t, elle se preci- 
pita chez lui pour lui extorquer 
I'arjresse de LuigL 



Arrivee chez lui, elle I'assailiit de 
questions 

"Ou est Luigi? L'as-tu vu rfi'cem- 
ment? Pourquoi ne m'a-t-il pas 
avoue qu il restait en France? 
Suis-je vraiment si laide que ca? 
Comment puis-je le joindre? 
- Je ne sais pas. non. je ne sais 
pas. oui, je ne sais pas. D'autres 
questions? - Tu ne peux vraiment 
rien me dire a propos de Luigi. 
P6pe Louis? - Si, je peux te mon- 
trer la derniere lettre qu'il m'a en- 
voyee. Je ne sais pas si cela 
pourra t'aider..." 

Elle saisit I'enveloppe et s'enfuit 
en courant. Le coeur battant, elle 
courut se refugier dans le square 
le plus proche. s'assit sur un 
banc et commenca a lire la lettre, 

'Cher Pepe Louis, 
Tu m'as conlie ton intention de 
t'acheter un modem 300 bauds. 
Si tu le fais. voici quelques nume- 
ros qui peuvent t'etre utiles: te 
(1) 531 57 25 et le (1> 565 10 03 
sont deux serveurs prives, dont le 
service est gratuit mais pas la 
taxe: n'appelle que de Paris ou de 
sa region... En attendant, puis- 
que tu es toujours sur Minitel 
malgrS tout, essaye sur le 614 91 
66 de taper* 137000712. login 
D019. password 1984. Ceta vienl 
de KGB Rennes, aussi ne le dif- 
fuse pas. Si tu veux utiliser une 
messaqerle semblable a STEL, 
mais bien moins occupfie, va sur 
le 615 91 77 et tape 'ESTELLE". 
Le fonctlonnement en est tres si- 
milaire. Je te faisse, je dois re- 
soudre quelques problemes avec 
Janine et Barbara." Janine eclata 
en larmes. 

Plusieurs mois plus tard, Janine 
s'est fait refaire le visage. Luigi 
est tombe amoureux d'elle, et a 
I'intention de fonder un foyer, 
Barbara continue ses sombres 
complots. et Pepe Louis soigne 
tristement sa goutte. La semaine 
prochaine, une nouvelle aventure: 
Catherine est amoureuse de Ro- 
berto qui la delaisse pour Sandra, 
mais lout s arrange grace a Pepe 

(1) cf. "Pepe Louis contre le gang 
des puces', Shift editions, 1985. 



OMNI-BOT 
VOUS SERT LE PETIT DEJ 

mettez le magneto en posi- 
tion d'enregistrement et 
grace a la tel^commande 
vous lui laites executer les 
mouvements que vous desl- 
rez. Votre robot enregistre la 
sequence de mouvements el 
pourra dorenavant la repro- 
duce. Sur une cassette, vous 
arriverez a entrer sept pro- 
grammes differents et par la 
votx vous lui direz de choisir 
celui que vous desirez voir 
accomplir. J'oubliais ! II peut 
lui aussi parler pour vous 
tenir compagnie ou pour 



Les robots de compagnie en- 
vahissent les appartements 
des americains a la vitesse 
du cheval au galop. La 
France, comme a I'habilude 



recolte avec du retard cer- 
tains de ces produils. Ainsi 
Omni-bot de TOMY franchit 
I'Allantique ce Irimestre. Son 
principe de programmation 
est particulierement simple et 
original: dans son ventre 
vous trouvez un tecteur de 
cassettes standard et dans 
votre main un t6l§commande. 
La programmation se dferoule 
de la facon suivante: vous 




LE 1541 ET LA BIDOUILLE 

Je vous avais deja pane des servee aux possesseurs du 
livres de Micro Application. "■ 
Du DOS du 1541 au fin fond 
de la memoire de I'Atari 800 
en passant par le basic de 
I'Amstrad, vous pouvez de- 
couvrir sans risques des 
mines de references. Pour 
('Instant, c'est en reference a 
I'ouvrage "le livre du lecteur 
de disquette 1541" que je re- 
prends la plume. En eKet. 
M.A. diffuse une disquette, 
"les programmes du livre du 
lecteur de disquettes 1541", 
contenant (vous vous en 
doutez) les programmes ulili- 
talres publies dans le livre 
sus-cite. Tous les flemmards 
du clavier profiterons dorena- 
vant de bons outits (editeur 
de secteur, modification du 
DOS...) pour bidouiller direc- 
temenl sur les disquettes. 
Elle est malheureusement re- 




envoyer la page detachable 
contenue dans le livre pour 
recevoir la disquette. 



chanter une ber 
petit dernier (er 
heureusement). 



FAIRE VOIR 

illll 

bleu petrols qui longe la Pro- 
menade des Anglais. Si qui 
que ce soil arrive a appren- 
dre rinformatique (en entier) 
avec cette formule. je veux 



DELTA AU SERVICE DES BRA 



DELTA est un tout nouvel ap- 
pareil capable de lire n'im- 
porte quel document, texte 
ou livre et de le traduire en 
braille sur une barrette tac- 
tile. L* utilisation est extreme- 
ment simple: on deplace une 
micro-camera sur le texte el 
la traduction est instantanee. 
Pour ce genre de choses, je 
trouve que la Science est au 
poil I 





lien etre pendu par les 
>ouces jusqua ce que mort 
i'ensuive. 



LE CASSE NE CASSE PAS 
DES BRIQUES 



Edite par Vifi-Nathan. LE 
CASSE. logiciel d'aventure 
pour Apple est nul. Vous 
allez encore dire que nous 
sommes des pourris et que 
nous ne savons dire que du 
mal des nouveaux produils 
Pourtant pour celui-la au 
moins, la discussion nest 
pas possible: ecrit en Basic, 
la programmation est si mau- 
vaise qu'il laut plusieurs se- 
condes pour analyser les 




nous 

racontons 

messages ^v* X V""/ **^ P as n'importe 
que vous entrez SNr \ / quoi voici un petit 

I'ecran et qu'il faut ensuite Vechantillon du listing de- 
que le programme allle cher- plombe, vous y remarquerez 
cher les reponses sur te dis- les premieres lignes qui ne 
que, une catastrophe I II faut comprennent effectivement 
de plus entrer vos questions que ce qui commence par 
en commengant obligatoire- "Je" et les lignes 562 et sui- 
menl vos phrases par le mot vantes qui gerent les injures 
"Je", sinon votre Apple ne que vous ne pouvez pas ne 
comprend rien. Nul, je vous pas lancer a ce programme 
dis I Et pour prouver que merdique. 



J' VAIS VOUS CUISINER MOI ! 



Ordicuisine ne recule devant 
rien; alors que i* mnjnrir^ 

des cuisimstes (vous savez 
ces gens etranges qui vous 
vendent une cuisine en deux 
minutes et 100.000 francs) 
reprennent leur billes, ils pro- 
posed un logiciel fantasti- 
que: en trente minutes vous 
avez un devis, des plans, des 
coupes, des elevations et 
des vues perspectives de 



voire future cuisine. Leonard 

II tnnms Mil IRM PP. auar un 

ecran graphique, une imprl- 
mante et une table tracanie. 
Si vous voulez devenir le cui- 
sinisle a la mode, il vous suf- 
fit done de Signer un cheque 
de vingt quatre briques a Or- 
dicuisine. Ca route la peau 
des f esses d'etre de son 
temps I 




CONTOURS "HEBDOGICIEL 
MICRO APPLICATION" : C'EST FINI ! 

Gerard MANSALIER, Olivier 
BION, Michel JUPPET, Denis 
JALLET, Christqphe GEN- 
SEH, Gerard KOENIG, Jean- 
Manuel MARTIN. Jean-Pol 
ROUCHY. Jean-Marc WAT- 
TELAR, Roberl SUQUET, 



La date du 31 Janvier a clos 
le concours organise aulour 
du logiciel Le Voyageur du 
Temps. Parmi les innombra- 
bles reponses que vous nous 
avez envoye, seules seize 
donnent une solution cor- 
recte de I'aventure. Majoritai- 
remenl vos talents d'aventu- 
riers depassent largemeni 
vos lalents de photographes, 
mais qu'importe ! Vous aime- 
riez savoir qui a gagne. 
hein ? Voici done la lisle des 
grands vainqueurs du temps. 
Pratiquants de I'adage 
"I'union fait la force", Yves 
GAYTE et ses eleves rem- 
portent haut la main el sans 
discussion le drive 1541 et 
I'lmprimanle 1525. En effel. 
leur envoi remonte au 12 de- 
cembre 1984 ! Enfin un cours 
d'informatique qui a du pas- 
sionner eleves et ensei- 
gnants... 

Jer6me UGHETTO. Stephan 
BERNOU, Yves TESSEUR. 




Jean-Chnstopne GAREtY et 
Marc LANTHiEZ partagerons 
le plaisir de recevoir deux lo- 
giciels (lun en provenance 
du Softparade, I'autre du ca- 
talogue M.A.), 



C'est nouveau, pa Went de sortir 



ACTIVISION : 
TOUJOURS PLUS 



Le catalogue americain 1985 
d'Activision contienl bien des 
surprises. Un changement 
radical des emballages a eu 
lieu. Vous pourrez mainte- 
nant trouver des softs 
moyens sous de tres belles 
pochettes. 

Rock N'Bolt ressemble au 
batard de Q'Bert et de Flip 
and Flop, seule une vision 



3Ds 



. le jei 



a banalite 



a plus 

The Music Studio est. oh 
surprise, un nouvel utilitaire 
pour exploiter les capaciles 
sonores du Commodore 64. 
Web Dimension vous fait 
changer de dimension, pas- 
sant par les combinaisons vi- 
suelles et sonores les plus 



deroutantes. Un jeu oil Tac- 
tion domine vos reflexes de 
la maniere la plus inflexible 
qui soil. 

Voyagez a travers le temps 
et I'espace grace a Master 
Of The Lamps . Vous devrez 
guider le Prince dans sa dure 
tache de regent, durant I'ab- 
sence du roi parti a la guerre. 
Deux jeux d'avenlure graphi- 
ques enfin: I'un medievalo-in- 
terstellaire en diable The 
Tracer Sancton . I'autre tout 
ce qu'il y a de plus contem- 





A MINDSHADOW 

porain Mlndshadow . Dans 
le second vous etes toiale- 
menl amnesique et a la re- 
cherche de voire identite 
alors que pour le premier 
vous incarnez un agent de la 
S.I. A {Stellar Intelligence 
Agency, jeu de mots !) a la 
poursuite du pire criminel de 
la galaxie: The Wing. 



LES BOURSES D'IBM 

Quand on est "THE" geant de d'accorder 300.000 frs de 

I'informatique, on a obligator- prix a quatres jeunes cher- 

rement des grosses bourses, cheurs francais. Et allez 

Et quand on les vide, ca de- done I 
menage. Or done, IBM vient 



CRISE D'EPYX LEPSIE 



La societe Epix va inonder le 
marche americain de ses 
multiples nouveautes. Les 
softs sont destines aux 
micros Apple et Commodore. 
Dans la serie "on prend les 
memes et on recommence": 




(oueurs pour pratiquer volley- 
ball, football americain et 
francais ou baseball. 
Vous pouvez dorenavant tes- 
ter voire aptitude a rejoindre 
les rangs du F.B.I grace aux 
epreuves du programme 
F.B.I . 

Ballblazer est le fils spiriluel 
d'un match de football et de 
la guerre des etoiles, vous 
devrez marquer des buts en 
transportant le ballon dans 
voire fusee. 



▼ BALLBLAZER 



A SUMMERGAMES II 

Pltstop II et Summergames 

II . Dans le premier la course 
de voiture se joue maintenant 
a deux joueurs, simultane- 
ment. Pour le second des 
epreuves de kayak, cyclisme, 
plongeon (huit au total) vous 
sont proposees. 
Tire du jeu "Risk", Empire 
vous invite a la conquete du 
monde grace a un graphisme 
plus qu'etonnant. La qualite 
de votre strategic vous 
conduira a la ruine ou a la 
maftrise du monde. 



T EMPIRE 





Rogue vous conduira au tra- 
vers de dongeons tous plus 
humides et miteux les uns 
que les autres a la poursuite 
de 1'amulette de Yendor. Son 
manque total d'originalite est 
compense par une qualite 
graphique hors du commun. 
The Right Stuff est le pre- 
mier simulateur de vol de 
cetfe maison et il est dlrecte- 
ment lire du film "I'Etoffe des 
Heros". 

Two-On-Two Sports devient 
le premier jeu a quatre 



Dragonriders of Pern est 

tire dun livre d'Anne Mac 
Caffrey, il s'agit de sauver la 
planete Pern a I'aide des 
deux races intelligentes qui y 
vivent: les dragons et les hu- 
mains. 

Moreta est adapte du second 
tome de la saga de Pern, 
vous aurez a eviter la famine 
pour foute la planete de 
Pern. 

Chlpwits est un programme 
pedagogique destine a ap- 
prendre aux entants la mani- 
pulation des mot-cles de 
Basic et la pogrammalion. 
Rescue on Fractalus vous 
entrainera a la recherche de 
vos compagnons disparus a 
bord de votre chasseur Val- 
kyrie. Prenez garde aux atta- 
ques traitresses des Jaggi. 
ils ne souhaitent pas vous 
laisser repartir vivant. Barbie 
el G.I. Joe sont des applica- 
tions directes des jeux avec 
fes poupees du meme nom. 
Hot Wheels vous introduit 
dans le monde mysterieux 
des dragsters, vous devrez 
preparer votre engin pour la 
course et le depanner en cas 
de besoin. Voila une annee 
qui s'annonce bonne, a 
condition que toutes ces nou- 
veautes daignent traverser 
I'Atlantique. 



A LA PECHE AUX MOULES, MOULES, MOULES 

Les vrais curieux qui se bal- 
ladaient dans les allees du 
Consumer Electronic Show 
de Las Vegas n'ont pas man- 
que de sarreter devant le 
stand Atari: ef pour cause. 
L'innenafrable Jack Tra- 
miel(sumomme "Jack Aparre- 
lemarche' par les boursiers) 
presentait ses nouveaux mo- 
deles dont que c*est qu'on 
vous a deja parle dans un 
numero precedent, consultez 
vos reliures. Or, et c est la 
que je veux en venir. les mo- 
deles en question n'etaient 



que des prototypes dont les 
carrosseries elles-memes 
n'etaient pas moulees. 
Conclusion des mauvaises 
langues: Atari n'a pas encore 
commence la production in- 
dustrielle de sa nouvelle 
gamme. On se marre comme 
des fous. 




PLUS LOURD QUE L'fllR 



"Comme Ton n'ecrase pas 
une mouche avec un mar- 
teau, Ion ne peut utiiiser un 
gros ordinateur pour impri- 
mer des etiquettes... Ainsi 
est nee lidee de JUMBO...". 



C'est par ces mots que CO- 
SERM vous invite a depenser 
de 30.000 a 50.000 francs 



(hors taxe) pour imprimer vos 
etiquettes. COSERM, ca veut 
dire Conseil Service Etudes 
Realisations Marketing. Pour 
moi marketing ga signifie ci- 
bler son public, alors il taut le 
faire: JUMBO c'est du leger, 
de la dentelte, de laerien (au 
choix: elephant ou Boieng) ! 
Par contre, si vous vouiez 
imprimer des etiquettes, mon 
copain s'est ecrit un pro- 
gramme sur son Apple et en 
plus il peut jouer a Lode Run- 
ner a ses moments perdus. 



L' ALLIANCE ATLANTIQUE 



ELECTRON SOFTWARE a 
acquis les droits des logiciels 
de First Star pour la France. 
Premiers effets sensibles de 
cette operation, les softs edu- 
catifs Romper Room's I et 2 
seront traduits en francais, I'un 
sert a rapprentissage de I 'al- 
phabet, I'autre a celui du cal- 
cul, les deux sont destines a 
Atari, Apple et C64. First Star, 
c'est aussi les deux hits Boul- 
der Dash (Apple, C64, IBM 
PC, Atari) et Spy versus Spy 
(Atari, Apple, C64), Pour vous 
donner une id6e du succes de 
Boulder Dash aux Etats-Unis, 
sachez que c'est le premier jeu 






A BOULDER DASH 




A SPY VS SPY 

pour micrc-ordinateur a avoir 
ete adapte tel quel en jeu de 
cafe par Namco. Pour cette 
annee 1985 la societe an- 
nonce Boulder Dash II qui est 
a Boulder Dash ce qu'esl Lode 
Runner Championship a Lode 
Runner, U.S.Adventure un jeu 
geo-politico-historique destine 
aux petits americains qui veu- 
lent tout savoir sur leur grand 
pays, Spy vs Spy II , Super- 
man et Wonder Woman (tous 
pour C64, Apple. Atari et PC). 
Enfin, une adaptation de Boul- 
der Dash et de Spy vs Spy 
pour MSX. 



LE PREMIER SIMULATEUR DE 
LEON ZITRONE 



Le PMU, officine commune- 
ment d^nommee par exten- 
sion "le tierce", vient de s'in- 
formatiser. Le langage choisi 
pour equiper les DPS6 deja 
implantes est "Info", de 
Henco Software. C'est un 
langage de quatrieme gene- 
ration si puissant, que le di- 
recteur informatique du PMU 
et le directeur technique de 



Henco se tapent sur le ventre 
en disanl "On est vraiment 
des bons". Concretement, si 
vous trouvez le moyen de 



rentrer dans le systeme et 
d'avoir le quarte dans I'ordre, 
ecrivez-nous, vous avez 
gagne. 



OLIVETTI : 

MAINS BASSES SUR LES NOUILLES 



Le groupe Olivetti ne sait 
plus quoi faire de ses sous. II 
vient de racheter la filiale in- 
formatique d'EXXON en Eu- 
rope. Ca n'a pas du leur cou- 
ter trop cher, vu que la filiale 
en question ne semblait pas 
particulierement active 

(5000 terminaux Exxon en 
Europe). 




Comme chacun le sait, 
EXXON est piutot specialise 
dans le petrole, puisqu'il 
s'agit du groupe ESSO. Bon. 
Apres tout, tout le monde se 
tamponne de savoir qu'Esso 
fait de I'informatique et 
qu'Olivetti les rachete. La ou 
ca devient drdle, c'est quand 
on sait que dans la meme pe- 
riode Olivetti a rachete ega- 
lement le groupe alimentaire 
Buitonl. Les ntals sont im- 
payables: avec des pompes, 
des nouilles et des micros, ils 
font un holding haul la 



RESEAU 

CLUB 

APPLE 



Ca y est, les membres du 
Club Apple ont leur reseau. 
On peut y acceder par 
TRANSPAC, a condition de 
pos seder un numero de 
membre et un numero de 
code. Les inscrtts sont peu 
nombreux pour I'instant, 
Ouand aux services, ils sont 
aussi interessants que la lec- 
ture du Figaro. Gageons que 
tout cela s'arrangera dans 
les semaines qui viennent. 
Or done, ces services propo- 
sent une messagerie el quel- 
ques annonces publicitaires. 
A I'heure ou j'ecris ces 
lignes, il n'y avait qu'UNE 
seule annonce publicitaire: 
celle du Club Apple. On peut 
egalement demander ' des 
renseignements au service 




DEUUGNE: ENCORE PLUS! 

A chaque semaine ses surprises et ses disillusions. Philippe MALINSKI propose une utilisation judt- 

Du Tl 99 au Spectrum, de I'Exel au ZX 81. du MSX cieuse de la touche F1 du C64 qui arrete le listing en 

au X07 c'est le desert. Tant pis pour tous les pro- cours. Pour reprendre la main, faites RUN/STOP + 

pnetaires des sus-nommes, tant mieux pour les RESTORE et relancez la liste par SYS 828. 

autres. 

_ ,,__,_, , , ▼ Listing Commodore 64 

Daniel PETIT perp^tueiise en choeur avec son TRS 80 

(I ou III) et vous invite a en profiter dans une grande DflTfl^e, 163. 73,141,^0,3.169,3,141,21,3-66, 

communion calendriesque. S*' 32,159,235, 165- 203,201, 39, 240, 24?, ?6,i9i 

1 DRTA234 : F0Rl-628T0a52 I REfiDH ■ POKE 1 , fl I NEXT I 
PRINT"P0UR STOPPER UN LISTING 
■aFIN!" :SVS628 



y Listing TRS 80 



;i CLS--iHi\s\-viiTia3/m/u,r;*.f-tnEniM,2>'Q%=mBHM,*,2)'D 

fR10(r««,2)i|*VM.(l*):CW«L<C«Mr>VM.<njiE»° , BIUlU2»3S':F 
0*INT(D/4J+BrtW.I«lW(ei,C,l))!6=«r(F/7|:*6«7:I=f-H:IFD/4=M I 
<0/4>M}C<3M>04n£NI=l-I I 

21 J^ , WltlMWKHJEUVE)6M':pfllNrHtM{Jt,102,]):F>RIirr:PRI(n 

arrEfiiwi cwit«i)':FOflj=«TOi:j=iiiMi , ^' , i:ienj:iFrtE)(ii«e ^ Listing Thomson (n° 1) 



o 

Jean-Luc MOROUKIAN regrette visiblement de ne 
posseder d'Oric, du coup il sonorise le clavier 
i'Apple en un son et deuligne. 

^ Listing Apple (rf 1) 

1 PATA HI. 21, 1*1,65, 170,149,3,141,64, 
!T0, 142.0,14: ,43.3. 162. 10. 142,44,3,9 4, 32, 
27,253, 140.66.3. 142,47.3, li0,0, 174. 65,3 ,4 
4, 4S, 192, 202,203,4. 174,65, 3, 44,40,192,136 
,208 ,244,204,44 ,3,203,23?, 32 ,1 0,3,1 74,47, 
3,172,48,3,94 

2 RESTORE : PRINT CHRt 1211: TEXT : 
HOHE : FOR I - TO 44, READ P: POKE 76S 
+ I,P- NEXT : CAUL 748 FLASH i PRINT 
■C'EST PARTI I NORMAL i SEW 



technique du club et consul- 
ter la liste des abonnes. Rien 
de tres bandant. Bon, je vous 
donne tout de meme les 
infos :Transpac; 601 .91 .00, 
ensuite tapez le code de Cal- 
vados: 1 75040781 puis 
Controle G. Le code d'entree 
est CLUB APPLE. Donnez 
ensuite votre numero d'adhe- 
rent au club (entre 1 et 5000) 
et trouvez une cle a 3 ele- 
ments:une lettre et deux chit- 
fres. 

Pour acceder a ce reseau ou 
a d'autres, je vous conseille 
['excellent logiciel ACCESSM 
sur Apple, mais je ne sais 
pas vraiment s'ii est deja 
commercialise et c'esl une 
honte d'avouer ce genre de 
chose. 



1 CLEAR, , lsDEFGPn: a .'' = 130, 139,68,56,56.56 
,16, 16:CLS:SCREEN3,O,0:ft*-CHR*(£7>*' , C"fC 
R*( B >+CHR* C27 :■ + " C"i LOCATES. 9, 0:PRI NT "UH 
llEtz les touches - et ♦ pour vous dlr 
i9er."!PRINT l, 0PPUYER SUR UNE TOUCHE POUR 
C0PII1ENCER':B*-INPUTta):PLHV"SI ,, :P0KE5 1 H 
E-C3,BiCLS 

Z FORT- 1T01 0i CLS I A=B0t LOCATE lr4T(RNO*10*£ 
0>,EB, 0! PRINT"!' :FOR1=0TO20:S=S-(SCREEN< 
A, I) -36): LOCATES, I : PRINTO*: A1=A: 1*=INKEY 
I! B=*+( I*= "-■)-< It. " + ">: LOCATES, 0: PR I NT" 
SC ";S;-TPS I, ;T:L0C«TEA1,1IPRINT ,I "tNEX 
Tl NEXT: COLOR 1: PLAY "LISDOPDOCOREPPEREM I PN 
IMIL40OO'!GOTO1 



C'est Christophe BFtENIERE qui empoche les deux lo- 
giciels cette semaine. Je ne devoilerai aucun secret, 
a vous de decouvrir la ruse incluse dans le pro- 
gramme. 
W Listing Apple (rf 2) 



m«int»n»nt^: LIST :D ■ 1010:F ■ 
GOSUB2-EHD 

2 FOR 1 • D TO F: READ J: POKB I,J: 
NE1CT i RETURN DATA (69,0, 133,74,16ft, 
149,208 , 1 33,73 ,177,74,143,74,200,208 ,249, 
230,75,208,243, 173, 131, 192,94,173, 131, 192 
,76,191,157,24,3,164 



Enfin Jean-Frangois AUBRY remporle la palme des 
retardataires pour les voeux, mais un retard vaut 
bien un fromage (euh! Un logiciel). 
^ Listing Thomson (n° 2) 



'■ 155 .JPi. ■ 15-J- "EI .'J'JS SOUHfllTE 

T SB. HLOCATE£0.e:PRINT-* MEILLEURS VOEUX 

*"iDEFGRt<0i = r?J, l»i, i?;.?6.£4B,25£,S54 
,63:L0CATE1,19:FRINT ,I » BONNE ET HEUREUSE 

hNNEE 1985 »" 
£ CEFQR*tl)-i;, 1£,2«,«B, E4,1B, 12,0!ATTRB 
I:PRINTTflB(lE: ■ GR* > (5 :■ . ThBl lSiGRtC 1JJ :B0X- 
019,199;:H*-"3SfRqSBNlPjOk[1iLoJo99JtB,7 
,6»8-l'3-»), .'3,^*63019e06a = ,, :FOi!I»lTO54 
5TEP2!LINE-<4»ftsr.(iI0».-.at,i:..i-13£,4»ASC( 
MI t'f t A* . 1*1 > > - 1 3£ > , 4+1 1 * < I * 1 90R I =£ 11 ! NEX 
TiSCPEENPRINT 



Suite de 'a page i 
ca part o'une inec commune un 
dess n est donne j.. tegisseur qui 
est cna'ge de prendre ses zuc.cs 
L'equipe c-r s t e-suite parmi les 
cliches qui 'cv:ennent et c es: 
secernent asres cette selection 
que se 'ait 13 mise en page Et qn 
a 81 pages ccmne ca chaqje 
page est reec Oe toutes pieces 
Al:>-s in-agme tol le boulot que qa 
represente 1 

H- VOuS tire; HaraKir. a comb-en 
fl exe ti planes V 




C- On lire a 120 000. en ce mo- 
ment. Ou 100 000. 80 000. ca 
depend des couvertures 
H- Et au debut du lournal ' 
C- Pa; rapport au drjbut on -e 
peut pas savoir ou on serait alic 
0" a ej des nterdictions qui nous 
out fait beaucoup de mal En 
196' . qn a ete interdit six mois et 
en 19GB aussi, a ■ epoque on ti- 
rait a 240 000 exemplaires ' Et en 
Cispara ssait des klosques pen- 
dant six mois. le lectei»r ne '.e 
cberche plus, tu es une marchan- 
dise pas se'ieuse Sans ces inter- 
d cticrs. peut-etre qu'on en serait 
a 300 000. dOO.OOO. va savoir. 
ces interdictions nous on! vrai- 
ment coupe .es cou \-es 
H- Vous conna'sse; les lecteurs 
actuals ? Ce sont de rouveaux lec- 
teurs ou des anciens qui continucnt 
a vous hie ' 

C- Les deux. Moi J'ai ma gueuie 
da-s e lOu'nal depi. s nes annees. 
done ;e suis reconnu partout, et ie 
suis toi.c-.irs surprs Ca m est ar- 
rive de me fare a'reter sut la route 
par des motards pour un autogra- 
phe. 

H- Y a-t-'l quclquo chose que tu 
regrettes ? 

C- Oji que les gens n'ait pas 
continue a acheter Charlie Hebriq 
C'etait notre joie de mte. notre ru- 
de se reumr chaque semaine. de 
'aire des fetes a rj-aquc bouclage. 
on laisait des fetes qii^'lcsqus.. 
on se retrquva-t a cent personnes 
dans la sane oe redactior- ca se fr- 
n'ssait au champagne au Ood n 
Bouttant. c'etait vtaimenl la granne 
fnl,ft Fl mianc ra s'ast Bfrtfe 
quand Charlie hebdo s est mis a 
oattre de laile. cest si'.- qui- y a 
cu un stress dans l'equipe. il y a eu 
vraiment un grand stress qui n'a 



C- Va savoir. on a du les lauguer. 
tu sa:s. Ms nc nous acretaienl que 
de lemps en temps. ,e crois qu'on 
a creve de (a Its savaient qu on 
existait. on ne les sumrenail plus 
beaucoup. on les avail habitues a 
notre n jmou'. a nolte forme des- 
prit Is se d'Saiem '?.- ban ils sont 
encore 14*. ou a'-vs quand >l y avail 
un grand cvP > cmer,l '!s se disaicl 
"quest-ce que Oathe heboo a bien 
pu denser de a visite du pape a 
Paris* par exemple. El quand on a 
annonce qu'on arretait. ca a ete 
vraiment le drame pour eux. les 
coups de ti! les lettres. lout ca 
Mais cest bien lait poui leur 
gueuie. vous avie; qua nous ache- 
ter toules les semames " 
H- Qua n d vous ave; (ait le dernier 
nuK-eo sr.ecia- apres 'emission de 
tele 'Droit de rcponsc' de Poiac. 
pourquoi nave*-vous pas recom- 
mence en disant "c est pas vrai. on 
arrete pas" ' Pourquoi n'avoir pas 
utilise le vieux true des stats du 
shpw-bus'iess qui 'ont leurs adieux 
et qui reviennent pat derriere ? 
C'etait un super coup de pub. 
emission Je Polac ! 
C- Not. on aural recommence ce 
qu'on laisait. on tetombail auloma- 
aquernanl cans le meme vice. Ii au- 
\i\ laiiu qu'on teouve la 'nrmjie qui 
suro-en-e cuaoje semaine On a 
ceriamerrent une part de 'espesa- 
t,-it k mais qn ne sail (aire que ca. 
tu vois. peisonne ne peut savou 
pourq-joi les gens se componaiem 
comme ca vis-avis de nous Le Ca- 
rard enchaine ccntinue ses ventes. 
a'ors que cest Visible, le Canard 
e~chahfji Ca sen! le pipi de vieux. 
cest vraiment le caiembour. le ieu 
de mots, cest meme pas mediant 
Les articles commenced fiien et 
puis hep ca se termme par un jeu 
de mois. 'a mechancele retombe 
Le Canard encnaine fait un boulot 
de flic, e'est "Oh. Chaba'-Oeima 1 . 
paye pas dimpots". *Machln a un 
cnlteau*. cest pas du iourraiisme. 
cest de I indication cest de la 
merde Nous, on prcnait un evene- 
ment. on essayait de donner au lec- 
tem ie sens du critique, on ne lui 
fSrSfrH avaier les couleuvres de per- 
snnre Mais il faut reconnailre que 
cest une forme de lournalisme qui 
a lasse les gens 
H- Et Charlie Matin ? 
C- Y a des mecs que j aimc pas. el 
je sais quits nous detesteni. cest 
Liberation. Et je r,e sais pas pour- 
quoi ' 



va leui donner uu million C etait 
pas nen. un million ancien a lepo- 
que Et puis ces mecs-la nous onl 
mepnse ie ne sais pas pourquoi. 
pejteue pa-re qu'il y a eu des arti- 
cles dans Charlie hebdo Mais enfm 
c est ca. le lournalisme las lou- 
lours une tache sur ta ciavate. aiors 
sous prclexte que e'esi les conlie- 
res de Libc un a pas ie droit de dire 
'dis-donc. Serge July il a une lache 
sur sa cravat-' ? Aiors va savoir 
pourquoi. ces gens la ont decide de 
nous detesler. d'aillems quand 
Charlie est mod. lis ont litre 
"Creve. Charlie' 1 

H- Mais quel rapport avec Charlie 
Matin, ie comprends rieu ? (NUHL 
le whisky don y etre pour quel que 
chose ') 

C- Tout ca va eirc reiie. atlends 
C'esl pout lexpiiquer I atmosphere 
qu'H y a en ce moment avec les 
pedts copams de Liberabon. on est 
vraiment en dehors de tout vis-a-vis 
de ces gens-ti. on est vraiment des 
cons 

H- Mais Cest quoi. e'esi I'ensem- 
bie dc Liberation, ou c est July ? 
C- Je ne sais pas 
H- Les 10 000 balles. cest Libera- 
tion nouvelle formule. quand July a 
repns ' 




H- 



!>.:■: !! 



jam. 



1 Quel rapport avec Charlie 

Attends. i'y viens ' 1 ■■■■■ u :■- 
quand ils ont eu besoin de (aire la 
qie'e e! qu'on etal nches on leur a 
he une hrKiJii. 10 000 balles. 
H- Pout une pubticite ? 
C- Non. non. comme ca. quand ils 
' • ■ ,we."\ la queie. moi i'avais ■' 1 on 



-:r 



C- Non. c eian tout a lait au debut, 
quand Liberation s'est cree el qu'ils 
avaient besom de (nc On gagnait 
de l argent a lepoque. on s est dit 
laudrait les aider, bon. on va leur 
donner 

Mais revenons a mon histoire July 
annonce que Liberation arrete et re- 
paraTtra quelques mois apres 
J'etais tout seui au bureau de la re- 
daction, et poi.r emmerdet July, je 
telephone a lagence France- Presse. 
I'AFP :' lei Georges Bemier direc- 
teur de Charlie hebdo (alias Proles- 
seur Choron) J'ai un communique 
a (aire etanl donne que Liberation 
s arrete et que ca fail un iron dans 
la presse qunlidienne. l'equipe de 
Charlie hebdo a decide de lancer un 
Quobdien qui s'appeiiera Charlie 
Matin". Ce con de I'AFP y croil 
compieternent el ii dilluse ca oar- 
foui r Aiors imagine-toi la gueuie de 
July ' II a dit 'Merde. il prolite du 
Irou*. el en plus e'est ce que i'avais 
dit 'ie me lance dans le creneau !' 
H- Mais c'etait un gag. au depart ' 
C- C'etait un canular. cetart juste 
pour (aire chier Jury El quand les 



qars arrivent. Cavamia. Gebe. loul 
ca. ;e leur dis 'Voila. les gars, 
vous aiiez pas me croire ma<s j'a> 
lait ca' Je lannonce comme un ca- 
nular. mais ils veuient tous le fane 
VRAIMEN1 'allez. on le fad. ne se- 
ranee que deux |" 
Ca a ele une pub hate extraordi- 
naire les teles qui disaient 'Ma<s 
vous etes des saiauds vous ave; 
profile de la mort de Liberation, du 
moins de la cessation de paraiire 
pendant deux mois pour vemr la' 
et on disait 'vous savez. cest la 101 
de la |ungle. dans un monde capita 
lisle c'esl normal qu on prenne la 
place des morts !*. On a done lad 
deux numeros un pour qu'il existe. 
el un numero en disant 'Cest trop 
diflicile. on s'artete' Mais on en a 
vendu vrajmenl beaucoup 
H- Tu as pas un message pour 
Serge July ' 

C- Oui. je dis a Serge July que Li- 
berabon cevera avanl Hara-Kin. de 
luuies facons Cest sur Et qu ii a 
tort de se com porter comme ga 
Parce que le jour ou il cevera il 
aura peut-elre besoin de moi 
Mem pec he que quand Charlie 
hebdo est mort. ils nous ont banc 
de vieux cons, mais 48 heures 
apres que les vieux cons n existent 
plus, chacun recevan un coup tin 
telephone chez lui. pour coiiabotet 
a Liberation 

Enfin. ceci dit. c'esl quand m£me 
inalbeureux pour la ptessc quob 
d'enne ttanca.se mais en ce mo- 
ment, si ie suis devant un kiosque 
le matin el que je veuille achetet un 
lOutnal. ca seta Liberabon Parce 
que ie teste, cest vraimenl nen du 
lout Avani. ;e me regalais avec le 
Monde qui est devenu une sombre 
meme pd'ce que les gars se som 
pohbses. done tu sais a I'avance 
qu'ils sont de gauche. Je lisais ie 
Monde a lepoque ou us te do- 
naient I intormation et c etai! ensuitc 
a toi de la-re Ion travail dans la 
(ete on te prenad pas pour un con 
Je crois que le Monde a creve le 
lour ou Fauvet a tail un editonal 
pour voter Mitterand en 81 . 
H- Mitterand habile a cote d'ici. 
non ? 

C- Oui. et 1 ai eu une sacre histoire 
avec lui On avail ou un coup let, et 
on part che* Omar, un Iroquet au 
com du Boulevard Sami Germain et 
de la rue de Bievre. la tue ou habile 
le President La-bas on se met a 
boire du whrsky-Suze. Ui sais. au 
lieu de meltte de I'eau on mettait de 
la S../R dans le whisky. Cest va- 
cnement bon. ,e vous recommande 
ca 

B- Quelle horreur 1 
C- Mitterand venait d'etre <"■■■ en 
Mai 81. C'etait en pleme periode ou 
la Fiance etait completement rose. 
c'etait tetat de grace, le change- 
mem, gnia gnia gnia Et moi ie pas- 



sais a I'Oiyirpia i'avais une chan- 
son qui disail 'Ca lait ceux muis 
ql- us so'ii ac polvoiv a gajche. 
ils ont meme pas guen ie ca n cer. 
pourtant c'etait la mornd'e des 
choses' Et des tas d'autres chan- 
sons pas ties sympa pour e go.- 
vernement Oonc &.ez Omar, me 
voila parti a chanter tout ca Et pa- 
raii-il que Madame Vlitteiand. e" 
sonant de I'Elysee. passe deva-i: ie 
bar a ce moment-la. Ehe eireno 
chanter elie monte chez eile el elle 
tele^tio-e a-j commissa-iat "f a u- 
ene-gunene dans ma rue. laudtait 
peut-etre I'arreter" Et i'ai vj arriver 
une armee de n.cs dans ie bistro 1 . 
:,-.'-.■- ca va comme ga. on t en- 
barque' Je me SUE retrouve a m>- 
nuit a la DST {Defense de la Secu- 
nte du Ter.-'toire ': Ou ils ne 
savdiert sas quoi fnutrn dc moi ' Ms 
m ont quard rre'rie hbere ve-'s deux 
heures du matin, .e corrn-. ssaire 
est venu. ma oris dans sa bagnolc 
et ma rai'iene. tiais a 'nere Mi!!e 
rand el les lournalstes ont oement 1 
ie lencemam Paice Que. merde. 
c etait illegal t ne genais per- 
sonne. ie chantais dans un bar. .e 
ne faisais pas de tapage nocturne 
je ne foubi; s pas 1 ordre r jbi.r 
dans la rue ' 
H- ^i.'eusorent oi.e fi et?. s que ■ 



cat des felgnarits* ia d'accord 
Mars Si ils conunuenl a usurper un 
Mre a^que: ils ""'ont pus fjrqlt la. 
ie vcudrais etre min.sire de 1 mte- 





qu un de connu ' 

C- Oui. neureusement smo" c'etait 
le I'Hu ! Tiens. ire autre anecdote 
quand Kahtlc a ele dusgne Mimstre 
de la Sanie. tu sais courquoi il I'a 
ete ? Parce que ouand il etait •:„■■•: 
ii etait brancardier. ambu'ancier. 
H- Tu te situes politiquement ' 
C- Non. surtout pas I 
H- Si tu cevais etre au gouveme- 
ment. quel poste cho:ssirais-tu .' 
C- Je voudrais etre ministre dc 
linterieur pout taper sur .a guci.'c 
des gens qui s appelient encore tra- 
vailleurs. Parce que je dis qu'a par- 
tir du moment ou on ne travaille 
que 35 heures par semaine. on a 
plus ie droit de s appeier iravameu 
on sappelle leignam Ms usurper.t 
w quaii'icatit 1 Tu ws qu 'A 1 HJi Is 
les ont deja. les 35 heures. Et ils 
continuent a s'appeler travailleurs ' 
Tu te rends compte ' Qdand ils au- 
ronl le courage de due "CGT. sydi- 



lieu 

H- lu sais que ".u vas te '3«e tra- 
ter de mec de droite 7 
C- Oui. mais ie suis co-itent. Ca 
veut ne"i dire, tcut ca ce sort des 
mots. Je suis piutDt de gaLc;-e 
ouiSQje ga veut di'e "remcttre les 
choses en quest:cn". do-.c re'nettra 
en question 'es auaiifieatlfs et les 
termes. On ne part pas sur les 
icees qu'on t a fiiees ;c"'tns ga 
(pqmg sur la label la oicite cest 
ga pour moi c est des gens qui 
sont restes Mges. honneur. palne 
eul. . venu. ga ma plait pas du 
tout. O'un autre cote tu as la gau- 
che qui fait exacterrent ce cue fai! 
ia droite. ronneur patne. verti. us 
dun'-ent deux sous de plus aux 
smica'ds. lis prenient a ceux qui 
sont un peu plus rlcnes. Tout ga 
cest teilerrent derisolre 
H- Acnctto's cjc dernain. va sa- 
voir pourquoi. une tee arrive te ba- 
lance un coup de baguette mac c;„e 
sur la cascuette. et te dit "Tu es 
president ae la -epub.quu. fais ^e 
que tu veux !* 

C> Je decrete une ci rendant Haia- 
Kir ub Jd'oite ^our clib^jt' enter 
venant au rrende. e- meme temps 
que son bulletin oe naissance on lui 
dor-e.-a son bulletin o'abonnerre": 
H- Ou il faudr3 qu'il paye ' 
C- Ah qui !!! £t a vie "' Meme s: 
le pouvoir change, a ve ' Bulletin 
oe njissance cest gratuit Bulletin 
dabonnemertl a Ha'a-Kin cest 
payant ! Et le pers. tenement nej- 
reux d'etre pe-e. B discutera me-ie 
pas le pnx ' II y a qj'une chose ge- 
nante si on prend le pouvoir. 0" 
aura plus le temps de (aire Hara- 
Kin. a- ceut aas 'are les deux a la 
fais. Comme dit 8e r rayei. on vou- 
drait blen refaire le monde. mais on 
toujours deranges par le teiA- 
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HEBDOGICIEL- '.'■ ■ 
seur Choron 
PROFESSEUR CHORON 

Casse-toi. petit con 1 
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Suite de ta page 24 
• J'avais oublie, cong ! toni- 
true-t il en extlrpant une gitane 
de son paquet bleu. 
II tripatouille sa moustache 
dans les deux sens d'un air 
absent et se decide enfin a me 
lacher le morceau. 
- J'ai besoing de toi Pepe 
Louis ! Toutes mes equipes 
sont out' et il me tombe une 
sale histoire sur le dos, que 
meme j'en ai des boutongs 
partout cong ! 

Je me carre dans mon fauteuil 
en expectativant la suite. Ef- 
fectivement, il se penche un 
peu plus vers son bureau en- 
rnbre de dossiers et me su- 



surn 



visage: 



Cest un gros coup... Vingt 
jeunes femmes ont disparu 
avec leurs machines a laver ! ! 
Je ne sais pas ou donner de la 
tete, mais ce serait un coup du 
Gang des Puces que ga ne 
m'etonnerait pas... Veux-tu te 
charger de laftaire Louis ? 

- Monsieur le Directeur, vous 
savez que je suis a la re- 
traits... 

II bondit sur son siege, el sa 
gitane tumante volttge a tra- 

- Fous-moi la paix. Louis ! Tu 
es le seul a avoir eu affaire au 
Gang des Puces ! J'ai vrai- 
ment besoing de toi, cong I ! 

- De-sole patron... Je suis frpp 
vieux pour ce genre d'enquete. 
Je suis a peine capable de 
taper sur un clavier de micro. 
Regardez, j'ai les phalanges 
tordues et de la corne sur les 
doigts. J'ai les jambes ramollo, 
les poumons en digue-digue, 
le foie comme une eponge et 
le cerveau qui se tire par les 
oreilles. Je ne vous serai d'au- 
cune utilite. 

Je le vois qui rougit et s'ap- 
prete a imploser. Mais le tele- 
phone plmponne au bon mo* 
ment et il decroche avant de 
parler. La conversation est 



d'autanl plus courte que le 
Vieux reste muet comme un 
cafetier a qui on demande un 
verre d'eau. II palit, blemit, 
verdit, rossini et martini, puis 
repose le combine avec une 
mine d'enterrement. 

- Ca ne va pas Monsieur le Di- 
recteur ? 

- Louis, on vient d'enlever ma 
femme ! 

Je subodore que je ne pour- 
rais plus echapper a la respon- 
sabilitede lenquete. 

- Dans sa machine a laver ? 

II eponge son front avec un 
formulaire Kbis de I'adminis- 
tration. 

- Oui... souflle-t-il. 

- Quelle marque ? 

- Euh... je ne sais pas... une 
Branque, je crois ! 

Je me leve brusquement (en 
10 secondes): 

- Ok patron, Je me charge de 
I'enquete. Ne vous faites pas 



CBS.crac, bourn, softs 



CBS a toujours orienle ses 
productions vers ie domaine 
educalif. Le catalogue 1985 
de la societe ne va pas a 
rencontre de cette "vieille'' 
habitude. 





Je viens a peine de prononcer 
ces mots qu'une lumiere aveu- 
glante tnonde la piece, et je 
suis projele contre la photo du 
president de la republique ac- 
crochee au mur ! 
(a suivre) 



grammes "Point Bac" d'Edi- 
ciel. 

First Degree and Advanced 
Linear Equations . Binomial 
Multiplication and Facto- 
ring . Simultaneous Equa- 
tions Quadratic Equations 
et Graphing Linear Func- 
tions feront de vous un veri- 
table Einstein, pour peu que 
vous travailliez les maths (et 
langlais. leur traduction en 
Irancais n'etant pas encore 
decidee). 

The Railroad Works vous in- 
vite a installer te reseau ierre 
dun pays nomme Amerique, 
et ce aux differentes epoques 
de {'industrialisation (train a 
vapeur. diesel. a turbine...). 



Mister Roger's Neighbor- 
hood: Many Ways To Say I 
Love You vous donne tous 
les trues et asluces pour en- 
voyer des lettres d'amour 
personnalisees et originates 
a voire petite amie, votre 
grand-mere ou votre 

concierge. 

The Sea Voyager vous fera 
sillonner toutes les mers du 
monde en compagnie des 
trente plus grands explora- 
teurs de Christophe Collomb 
a Magellan. Word Finder est 
un jeu lexical ou chaque 
joueur doit trouver en un 
temps Itmtte un maximum de 
mots de plus de trois lettres a 
partir des lettres dun moi 
propose par le programme. 
Mastering The Act est 
I'equivatent local des pro- 




Enfin Dr. Seuss Fix-up Mix- 
up Puzzler permettra a vos 
entants de faire des puzzles 
sans encombrer le tapis du 
salon. 

Tous ces programmes sont 
destines aux C64, Apple II et 
IBM PC. 
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EXPO 



INVITATION 



DIXIEME CONGRES EXPOSITION 

DE MICRO-INFORMATIQUE 

DU 16 AU 19 FEVRIER 1985 

PALAIS DES CONGRES (CIP) 

PORTE MAILLOT - PARIS 

CE COUPON VOUS DONNE DROIT 

A UNE ENTREE GRATUITE 

AU 10 e MICRO-EXPO 



HIPPOJOYST 



C'est Japonais, c'est un des meilleurs et des 
plus costauds que I'on connait: trois boutons 
de tir, une bonne prise en mains et quatre ven- 
touses pour le coller definitivement sur la 
table de la salle a manger (Super pratique pour 
les repas !). Prise standard pour Amstrad, 
Atari, Commodore 64, MSX, Vic 20. Compatible 
avec les interfaces d'Oric et de Spectrum. 
Pour Apple, Thomson et Texas, Tintin; ca ne 
marche pas ou alors il faudra bidouiller ! 
Ah, au fait, c'est 100 balles... 
C'est bon, c'est pas trop cher ? Envoyez vos 
sous apres avoir rempli le bon de commande 
ci-joint. Le ministre du commerce exterieur du 
Japon vous remercie bien has. 





Bon de commande a decouper et a renvoyer a 
SHIFT EDITIONS, 27 rue du General Foy 75008 
PARIS. 

PrGnom 

Adresse 

DATE: PU=100F...x...= ....F 

frais d'envoi = +1SF 
cheque joint: TOTAL = ,„..F 



HEBDOGICIEL SOFTWARE 

Le logiciel a sa juste valeur 

Les nouvelles boites jaunes sont arrivees ! Six logiciels francais de qualite; par cassette et un prix raisonnable ■ des 
produits signes SHIFT EDITIONS ! 
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ableaux. 120 francs les 6 jeux 
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jx. de I'eiectricile et du plaisir, 
vuiiauequoitairefretillerleselectruns 
dans votre M05 et quand en plus ces 
jeux so nt multiples et douzevous envi- 
sagerez quelques nuits blanches 
d'Othello. de Poker, de Memo 7... Des 

portable, partez pour I'espace pro- 
EandlWorp] ou retrouvez vos amis (fi- 
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dez Albert etKorigdansleurpyramide 
favorite, jouez a un jeu de halle en- 
tierement nouveau, construisez 
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dimensions. 6 
pourl20 francs 




* BON DE COMMANDE A REN- 

* VOYER A SHIFT EDITIONS, 27 
rue du Gal Foy 75008 PARIS. 



_. OHICN°4 

* ORICN°5 

* SPECTRUM N° 1 
TEXAS N° 4 

>r ZX81 N°1 
*. M05N°1 



120F. 
120F. 
120F. 
120F. 
150 F. 



DEUX SUPER-CONCOURS PERMANENTS 



20 000 francs de prix au M 
personnes en CALIFORNIE 

Un concours de plus! 
Rlen de blen original dans 
cette formule, pou riant nous 
essay on s de faire quelque 
chose de different: nous orga- 
nfsons un concours perma- 
nent tous les mols et tous les 
trimestresl Et avec des prix 
dignes des programmes que 
vous altez nous envoyer! 
De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes preferes 
sur la grille recapitulative 
mensuelle. 

Pas de Jury, pas de decision 
arbitrage, HEBDOGICIEL n'in- 
tervenant que dans le choix 
des programmes qui devront 
etre ORIGINAUX et FRAN- 
CAIS. SI votre programme 
n'est pas tout a fait au point, 
un de nos speclallst.es vous 
dira comment I'ameliorer pour 
pouvoir nous le proposer a 
nouveau. 

Pour parti ciper, il vous suffit 
de nous envoyer vos pro- 
grammes accompagnes du 
bon de participation ainsl que 
toutes les explications neces- 



EILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 
au meilleur logiciel du TRIMESTRE. 
saires a ('utilisation de ce pro- ART.6: Le prix alloue pour le 
gramme. concours trimestriel sera remis 

Bonne chancet au P | US t art ) un mo j s a pres la 

cloture du concours trimestriel. 
ART.7: Le present reglement a 
ete depose chez Maitre Jauna- 
tre 1 rue des Halles 75001 
PARIS. 

ART.6: HEBDOGICIEL se re- 
serve le droit d'interrompre a 
tout moment le present 
concours en avisant les lecteurs 

ART, 9: La participation au 
concours entrafne I" acceptation 
par les concurrents du present 
reglement. 



Reglement: 

ART.1: HEBDOGICIEL organise 
de facon mensuelle et t rimes- 
trie He un concours dote de prix 
recompensanl le meilleur logiciel 
du mois et du trimestre. 
ART. 2: Ce concours est ouvert 
a tout auteur de logiciel quelque 
so it le materiel sur lequel il est 
realise. L 'envoi d'un logiciel en 
K7 ou disquette accompagne 
d'un bon de participation de- 
coupe dans HEBDOGICIEL 
constitue I'acte de candidature. 
ART.3: La redaction d'HEBDO- 
GiCIEL se reserve le droit de 
selectionner sur la base de la 
qualite et de I'originalite les logi- 
ciels qui sont publies dans le 
journal. 

ART. 4: Ce sont les lecteurs qui, 
par leur vole, determment les 
meilleurs logiciels mensuels et 
trimestriRis 

ART.5 Le prix a' oue pour le 
concours mensuel sera remis au 
plus tard un mois apres la clo- 
ture du 



Sera declare gagnant le pro- 
gramme qui aura obtenu le 
plus fort pourcentage de vote 
par rapport a la totalite des 
programmes recus pour un 
meme ordinateur. 
Ainsi, pas de favorltisme pour 
les ordinateurs plus puissants 
ou ties diffuses. 



BON DE PARTICIPATION 



Adresse 

N telephone 

Nom du programme 
Norn du materiel utilise 

declare etre lauteurdece programme qui n est m une imitation m une 
copie d'un programme extStanl Cc programme reste ma propriete et 
j'autonse HEBDOGICIEL a le publier La remuneration pour les pages 
publiees sera de 1000 francs par page (un programme n occupant pas 
une page entiere sera remunere au prorata de la surface occupeei 



Le programme doit etre expeciio yi! support n-d^r.e.ique (cassette ou 
disquette] accompagne d'un descnptif detaille du materiel utilise, 
dune notice d utilisation du programme Les supports des program- 
mes publies sont conserves, n'oubliez done pas den faire une copie. 
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AUX URNES ! 



Abandonnez quelques instants 
vos claviers et prenez voire 
plus belle plume pour remplir 
le bulletin de vote ci-contre. La 
redaction d'hebdogiciel compte 
sur vous! 
La marche a suivre est simple: 

- Reperez dans la grille ci- 
contre le programme pour le- 
quel vous voulez voter ainsi 
que celui pour lequel vous 
votez en second (le second 
nous permettra de rendre plus 
equitable la formule de choix 
du gagnant). 

- Reportez le nom de ces deux 
programmes sur le bulletin de 

sur le bulletin de vote. 
A renvoyer avant le 21 Fevrier 
1985 a minuit a HEBDOGICIEL 
concours mensuel. 27 rue du 
General Foy 75008 PARIS. 
II est tort probable que ceux 
qui participent au concours fe- 
ronl voter leur papa, leur 
maman, leur cousine et la lota- 
lite de leurs amis et relations 
pour leur programme Normal! 
Mais comme chacun deux 
tera la meme chose, cela n'est 



pas bien grave! Toutefois, tou- ORIGINAUX du BULLETIN de 
jours dans un souci d'equite. VOTE; pas de photocopies, 
nous n'accepterons que les cela serait trop facile! 

Date limite d'envoi du bulletin de vote le Jeudi 21 
Fevrier a minuit. 



BULLETIN DE VOTE 



A renvoyer avant le Jeudi 21 Fevrier minuit a HEB- 
DOGICIEL, concours mensuel, 27 rue du General 
Foy 75008 PARIS. 

JE VOTE POUR LE PROGRAMME SUIVANT: 
NOM DE L'ORDINATEUR: 

NOM DU PROGRAMME: 

JE CLASSE SECOND LE PROGRAMME SUI- 
VANT: 
NOM DE L'ORDINATEUR: 

NOM DU PROGRAMME: 

NOM ETPRENOM: 

ADRESSE: 



# 



/• 
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APPLE 

CHERCHE genereux donateur 
d'APPLE (en bon etat) ou d'un 
IBM + lecieur de disquette < Id- 
giciels (Pirote ?). David BAILLY 
32 rue des Etats Unis 62000 
EPINAL. Tel: (29) B2 21 20 
apres 19 H. 

ECHANGE nombreux program- 
mes pour APPLE II jeux (Lode 
Runner, Flight Simmulator 1 & 
2, Apple Kong etc... et utilitaires, 
Version calce. ex Mu ingestion 
elc... Jean Marc ROUSSEL 2 
avenue du Tarn 12170 RE- 
QUISTA. Tel: (65) 46 25 68. 

VENDS APPLE II + 2 drives et 
moniteur Prix interessant (e'est 
du beige!!!). Tel: 080 570212 
BELGIQUE. 

VENDS APPLE II E 128 K + 80 
COL + couleur + 2 drives + 
100 disquettes : 14000 F. Ultima 
II + Sorcelerie + Bismarck irigi- 
naux : 300 F chacun, Tel: 875 
55 86 de 19 a 21 Heures de- 
mander Michel. 



ATARI 

VENDS jeu video ATARI VCS 
2600 + 2 paddles + 2 joysticks 
+ transfo + 7 cassettes (Com- 
bat. Space Invaders. AsteroTdes. 
Defender. Air Sea Battle, Sky 
Diver, Night Driver). Le tout en 
tres boo etat 1500 F. a debat- 
tre. Mickael DIDELOT 105 rue 
Jean Catelas 95340 PERSAN. 
Tel: 470 37 47.Apres 18 h saul 
les mercredi, samedi et diman- 
che). 

ACHETE langage assembleur el 
programmes sur ATARI XL. A. 

COMTE 9 ro« Satnl Just 12O00 
RODEZ. 

VENDS ATARI 800 XL peritel + 
lecteur de casssette + livres + 
revues + methodes basic sur 
cartouches + 2 joysticks + jeux 
(valeur 5200 F.) Vendu 3800 F. 
Christian MENSE 78 Boulevard 
de Paris 13003 MARSEILLE. 
Tel: 90 52 66. 

VENDS ATARI VCS + adapta- 
teur secteur + 2 paddles + 2 
joysticks + 9 K7 (Joust, Adven- 
ture, Defender etc.). (Valeur 
2000 F.) Vendu 1000 F. Jean- 
Pierre HAGNIN 10 mo de Mon- 
tauban 93410 VALUOURS. Tel: 
860 00 28 apres 1BH. 

ACHETE logiciel de jeu pour 
ATARI 800 XL sur cassettes 
Patrick BARRIEU Perrin 32500 
FLEURANCE. Tel: (62) 06 03 
07. 

VENDS ATARI 600 XL + ma- 
gneto + peritel + aula formation 
basic n" 1, 2 at 3 + nombreux 
livres + K7 Bruce Lee : 1500 F. 
Bruno DA COSTSA 19 Allee de 
la Prairie 77490 CHELLES LES 
COUDRAUX. Tel: 020 52 18. 



CANON 

VENDS CANON X07 + inter- 
face + adaplateur secteur AD 4 
et AD 5 pour interface et ordina- 
teur + cordon magneto + ma- 
nuels. Prix a debattre Tel: (51) 
55 90 30 

VENDS configuration complete 
CANON X07 + unite centrale + 
extension memoire XB 100 BK 
+ 2 cartes memoires 4K + 1 
carte lichier + 8 K7 program- 
mes de loglstick + nbx program- 
mes divers + livres + impri- 
mante X710 4 couleurs + 
adaplateurs + housse et embal- 
lage avec papier et stylo: 4800 
F. Tel: (40) 34 33 78. 
VENDS CANON X07 + carte 
de memoire 4K + cordon ma- 
gneto + 2 livres pour CANON 
(jeux) Prix 1500 F. Interface 
video couleur peritel CANON + 
alimentation Prix 1500 F. Mr 
GUILLEMOT 15 rue la Bruyere 
93800 EPINAY S/SEINE. Tel: 
412 16 33 aux heures de bu- 
reau. 



VENDS CANON X07 16 K + 
imprimante X710 + cordon ma- 
gneto + adaplateur secleur + 
programmes. Prix 3800 F, Tel: 
(37) 90 23 08. 

VENDS CANON X07 + impri- 
mante graph ique 4 couleurs 
X710 + carte rom moniteur de- 
sassembleur + 8 programmes 
logistick + 50 programmes de 
jeu + documentation complete 
+ interface magneto + housse 
+ adaplateur secteur. Prix a de- 
battre. JEAN SPRIET 21 AV 
DES ACACIAS 92500 RUEIL 
MALMAISON. Tel: (1) 732 26 



Jeune etudianl sans sous cher- 
che genereux donateur de 
CANON X07 pour club. Bruno 
THOUMSIN 200 rue de Han 
6933 BURE (BELGIQUE). 

VENDS CANON X07 8KO + 
table tracante X710 + magneto 
K7 + cordon + carte moniteur 
+ manuel + livre de Jeux. Sous 
garantie. Prix 3500 F a debat- 
tre. Tel: (6)046 15 14. 

VENDS pour CANON X07 + 
cane graphique. Prix 130 a 400 
F. Tel: (7) 824 78 12 demander 

Pierre BOUDIGNON apres 20 



COMMODORE 64 

VENDS COMMODORE 64 PAL 
+ magneto 1530 + TOOL 64 + 
programmes de jeux + docu- 
mentation et livres : 3500 F. 
Christophe MARLOT. region de 
Calais (62). Tel;(21) 35 25 70. le 
soir. 



CHERCHES nombreux commo- 
doristes (COMM.64 el 128) pour 
echanger des programmes sur 
K7 et pour creer un club dans le 
sud de la region parisienne. 
CHERCHE egalement impri- 
mante pour COMMODORE 
64 Jean Luc MONTAGNIER. 
Tel: 350 1 1 29. 

VENDS COMMODORE 64 flam- 
bant neuf !!! : 2200 F. lecteur de 
disquettes 1541 ; 2500 F, Mr 
KOSKAS 5 bd Saint Marcel 
75013 PARIS. Tel: 337 57 43. 
(si repondeur laisser coordon- 



CHEHCHE correspondents pour 

echanger K7 de jeux el docu- 
mantation sur le COMMODORE 
64. David JARRY 4 rue Valentin 
DEBAILLY 80330 LONGUEAU. 
Tel: (22) 46 57 60. 

VENDS COMMODORE 64 + 
moniteur couleur PAL SEC AM 
+ lecteur K7 + 2 joysticks + 
autof. basic + 15 logiciels de 
|eux + 8 livres : 6000 F. Yves 
COQUEL 2bis rue de la Jarre- 
tiere 48000 MENDE. Tel: (66) 
65 18 46. 

ACHETE COMMODORE 64 
avec lecteur de cassettes. Tel: 
636 24 14 . demander Benoit 
COLARDELLE. apres 17 H 30. 

VENDS K7 jeux et utilitaires 
Data base : 100 F. Screen gra 
phics : 100 F. Psyron : 50F. 
Solo flight (simulaleur de vol) : 
120 F. + livres 102 programmes 
pour COM. 64 : 60 F. Tel: 962 



3 57. t 



19 H. 



CHERCHE possesseur de 
COM. 64 et VIC 1541 pour 
echange de programmes educa- 
tils Michel ROUSSEAU 47 Ha- 
meau de la Jonque 91650 
BREUILLET. Tel: (6) 458 48 70. 

VENDS COMMODORE 64 ga- 
rantie 6 mois + perilel + moni- 
teur et 2 joysticks + magneto + 
livres (a la decouverte du COM. 
64) (les ecrans du COMMO- 
DORE) + 250 jeux et 50 utilitai- 
res dont (The tool, Simon basic, 
Forth elc.) Prix interressant. 
Fabrice DUCATEZ 16 rue V. 
Scotto 59760 GRANDE SYN- 
THE. 

VENDS COMMOOORE 64 + 
disquettes + moniteur VN 
Prince + TOOL 64 + Pinball 
construction + Everest ascent + 
disquettes + nombreux manuets 
: 7600 F. a debattre. N. THE- 
ROND 46 130 BRETENOUX BP 



VENDS COMMODORE 64 + 
lecteur K7 + drive + Joystick + 
livres + cables + Bruce lee dick 
+ ORDINATEUR individuel 54 a 
66 : le lout 5900 F. a debaltre. 
Stephane LICHINI 50 Clos si 
Girons 13290 LES MILLES. Tel: 
16(42) 24 20 90 apres 18 H. 



VENDS originaux sur K7 pour 
COM .64. (Slix, Exterminator. 
Hustler, Pilot 64 et 3D Glooper) 
: le lout 350 F. a debattre. 
CHERCHE K7 Spitfire ace. 
Herve GARCIA 273 avenue de 
Fontainebleau 94320 THIAIS. 
Tel (1) 686 73 56. 

VENDS COMMODORE 64 + 
magneto + nombreux logiciels 
le tout avec emballage d engine 
: Prix a debattre. laire offre a : 
J.F, HERRY 43 rue Chaude 
78240 CHAMBOURCY. 



VENDS ORIC 1 48 KO + cor- 
dons peritel et magneto K7 + 
programmes + livres : 1800 F. 
Mr SOLE les Harpilles 01450 ST 
JEAN LE VIEUX. Tel: (74) 36 69 
73 apres 17 H. 

VENDS pour ORIC 1 ATMOS 
logiciels "Concours Hippique : 
50 F. Panic :50 F. Scubsa Dive : 
65 F. Orion : 50 F. Hubert : 50 
F. Harrier Attack : 50 F.The 
Ultra : 50 F. Chess : 100 F. Pole 
Position : 100 F. (tres rare !) 
Super Jeep : 65 F. Aigle dor : 
90 F. Zorgon : 40 F. 3D Maze + 
Breadoul : 50 F. Tel: (26) 85 07 
21. 

VENDS ORIC ATMOS 48 KO + 

prise peritel + alimeniation + 
cable magneto. + nombreux 
HEBOGICIELS + logiciels (Zor- 
gons, Mr Wimpy. Ghost Gob- 
bles, Bombyx, Mime, Mille 
Panes) + manuel : 2200 F. a 
debattre. Herve JACOB 16 AVE- 
NUE Des Ecoies 93290 TREM- 
BLAY LES GONESSES Tel: 
860 88 87. 

VENDS ORIC 1 48 KO + ma- 
nuel + prise UNFNB + interface 
joystick + 1 joystick + 27 pro- 
grammes K7 : 1800 F. Tel: 340 
70 89de 18 a 21 heures. 

VENDS ORIC ATMOS + peritel 
+ adaptateur NB. + 50 pro- 
grammes :2300 F. VENDS im- 
primante MCP 40 1700 
F.Philippe BRUNEAU Tel: (43) 
94 07 20 heures des repas. 

VENDS ORIC 1 + peritel + 
cables et alim. + manuel + 
Irvres + K/ : IbUO I-. a MMMV, 
Laurent LABATUT 39 rue du 
Prat Dessus Plaisanoe du Toucfi 
31170 TOURNEFEUILLE. 

Tel '6(611 86 42 86 

VENDS ORIC 1 48 KO + ali- 
mentation + perilel + cordons 
K7 + K7 + livres initiation basic 
et ass. + K7 jeux et utiliL (50 
tjtresj) + rout, copie program- 
mes protege + nombreux lis- 
tings : 2500 F. P. GUILLET 7 
avenue de Saint Just 13004 
MARSEILLE. Tel: 16 (91) 50 02 
75. 

VENDS ORIC ATMOS 48 KO + 
peritel avec alimentation + mo- 
dulateur NIB + cordon magneto 
-I- livres + 8 K7 utilitaires de 
jeux (Xenon, Aigle dor etc.) le 
tout: 2000 F + magneto : 250 
F. Marc DURASK D8 allee St 
Exupery 92390 VILLENEUVE 
LA GARENNE. Tel: 798 40 46. 

VENDS ORIC 48 KKO 16 cou- 
leurs haute resolution graphique 
sous garantie (juin 85) + 10 
cassettes pleines de program- 
mes (jeux educatifs, mathemati- 
ques...} preeenregistrees ou in- 
ventees ■ 1 manette de jeu 
(Manche a Balais) SPECTRAVI- 
DEO + 1 interface de branche- 
ment. Le lout: 2200 F Thibault 
RUFFAT. Tel: (1) 704 97 43. 

VENDS ATMOS + fil antenne + 
peritel + 25 K7 de jeux (Hobbit. 
Xenon, Tyrann. Scuba, Lancelot 
etc..) + n' 3 de Theorie : 2000 
F. Denis ANCEAU 9 rue Frede- 
ric Bazille 34000 MONTPEL- 
L1ER. 

VENDS ORIC 1 48 KO + peritel 
+ alimentation + manuels + 
livres el revues + nonbreux pro- 
grammes + 12 K7 jeux origina- 
tes. Le lout: 1850 F.Nicolas GA- 
RANCHER. Tel: 904 SO 01 
I' apres midi. 

VENDS console VISMO pour 
ORIC ATMOS: 350 F. + ma- 
gneto K7 RADIALVA sous ga- 
ranlie 300 F documentation 
ORIC Prix a debattre. Tel:(9l) 
31 71 94 

VENDS ORIC 1 + peritel + cor- 
dons + alimenlalion + 6 livres 
+ 50 jeux du commerce a choi- 
sir parmis 150 1800 F Tel 
(49) 88 68 92. 



VENDS ORIC ATMOS 48 KO + 
magneto + nombreux livres + 7 
K7 de jeux + 1 K7 contenant 
plus de 100 programmes dont 
programmes Hebdo. + alimen- 
tation + cables 3300 F. 
Thomas BOUSSER 57500 ST 
AVOLD. Tel: (8) 792 61 97. 
apres 17 H 15. 

VENDS ORIC 1 46 KO + perilel 
+ alim. + CGV + cable ma- 
gneto + manuel + ORIC pour 
tous + 1 programme de jeux : 
1800 F. Daniel ALLARD 98 rue 
Gabriel Peri 95500 GONESSE. 
Tel:987 30 96. 



VENDS ATMOS 48 KO : 2400 
F. + T.V. NB portable : 1000 F. 
+ modulateur NB : 300 F. + 
prise peritel avec alimentation : 
70 F. + programmes jeux + 
manuels trancais et anglais + 3 
liwes :167 F. Jean LOUISOT 
LYON 69007. Tel: (7) 858 37 
67. 

VENDS ORIC 1 48 KO + peritel 
+ logiciels dont ( Aigle d'or. De- 
fense Force. Kikekankoi etc.) : 
1900 F. ou avec interface peritel 
: 2200 F. Roger BENET 4 allee 
d Amblonville les fofets de 
trance 77176 SAVIGNY LE 
TEMPLE. Tel: 063 85 48. apres 
17 H. 

VENDS ORIC 1 48 KO + peritel 

+ adaptateur NB. + cordons + 
80 logs. + revues + livres : 
2200 F. Tel: 681 18 54. deman- 
der J.Louis. 

ECHANGE 120 programmes 
pour ORIC ATMOS (jeux. aven- 
tures, utilitaires...) centre un 
TRS 80 modele 1 niveau 2 ou 
un Tl 99 + basic etendu. Lau- 
rent PELOU 16 rue BERYU 
49400 SAUMUR. 



SHARP 

VENDS SHARP PC 1500 + me- 
moire 8 KO + nombreux pro-, 
grammes + 5 livres : 1500 F. 
Jean Sebaslien ANTON 82 rue 
du General de Gaulle 77000 
MELUN. Tel: 16 (6) 452 01 76. 

VENDS SHARP PC 1251 + CE 

125 + 2 livres + livre "langage 
machine du PC 1251" : 1200 F. 
Mr VERTENDE. Tel: S244 06 
02. aux heures de bureau. 

VENDS SHARP PC 1500 + im- 
primante + extension 16 KO + 
lecteur de K7 + 5 K7 de pro- 
grammes du commerce + 7 
livres sur le SHARP + doscu- 
mentations + 2 rouleaux + 1 
jeur de stylos + malette + ali- 
mention + cordons (valeur 6800 
F.) vendu 3500 F. Daniel 
HAURO 1 2 Square Velten 
13004 MARSEILLE. Tel: (9t) 08 
19 72. 

VENDS SHARP PC 1245 + ma- 
nuel + interface K7 CE 124 (va- 
leur 900 F.) vendu 700 F 
Franck LECHEVALIER. 16 rue 
Victor Hugo 78000 VERSAIL- 
LES. Tel- 950 58 63 apres 19 H. 

VENDS SHARP PC 1401 (11 
mois de garantie) + interlace 
cassette SHARP CE 124 + 2 
piles neuves + manuel d' appli- 
calion. Le tout : 900 F. Tel: 345 
07 91. 

VENDS SHARP PC 1211 + in- 
terface imprimante CE 122 + 
adaptateur : 600 F. M. JOUS- 
SEAUME 3 rue des Charmes 
44230 ST SEBASTIEN. Tel: 34 
33 76. 

VENDS SHARP PC 1500 + 
livres de programmes et aide 
programmation + EXT 4 KO : 
1400 F. a debattre. Thierry MIN 
GUEZ. Tel: (3) 975 91 02 apres 
18H30. 

VENDS SHARP PC 1251 sous 
garantie + manuel + connec- 
ted magneto + 30 programmes 
environ (K7 & livres) + cassette 
C 60 vierge : 700 F. JM. 
CHNEIDER. MARSEILLE. Tel: 
16(91)70 90 90. 

CHERCHE contact PC 1500 A. 
DEMAILLE. Tel: (20) 95 00 13 
apres 18 H. (en semaine). 



SPECTRUM 

VENDS SPECTRUM 48 KO * 
interface + interface I + micro- 
drive + Tele NB + nbx. pro- 
grammes (gestion. jeux...) + 
livres et revues (Ordi 5). (Valeur 
5200 F) Vendu 3500 F. Patrick 
WORMS 9 rue du Plateau 
75019 PARIS. Tel: 249 03 56. 



VENDS jeux pour ZX SPEC- 
TRUM dont, Coball. Psytron, 
Sabre, Wulf, Vox. Manic 
Miner, Soft Piece. Frederic LE- 
FEVRE 24 rue de largonne 
93700 DRANCY. Tel: 16 1 831 
01 10. 

VENDS 8 K7 pour ZX SPEC- 
TRUM 48 K. Prix a debattre. 
Tel: (33) 50 16 06 hors heures 
bureau. 

VENDS SPECTRUM 48 K + 
lecteur enregistreur K7 + K7 
demons. + 2 livres d'autotorma- 
tion basic + interface Secam 
Prix 3000 F. (valeur 3390 F) Tel: 
(74) 53 01 87. 

VENDS ZX SPECTRUM pal + 
perilel + mod. nbx + ZX 1 + 
microdrive +■ ZX 2 + manettes 
de jeux + cables + malette + 
programmes + livres + K7. Prix 
4500 F. Bernard SAULME. Tel: 
204 09 67 

VENDS SPECTRUM 48 KO PE- 
RITEL + imprimante ALPHA- 
COM 32 + interface ZX2 + ma- 
nette de jeu + logiciels + livres 
de basic, d'assembleur et divers 
Prix 3500 F. a debattre possibi- 
lile de venle separee. Regis 
PIERSON Cite du Grand Cor- 
mer 78260 ACHERES. Tel: 914 
70 10 OU 074 20 03. 

VENDS SPECTRUM 48 KO + 
interface CGV + 20 program- 
mes + livres (valeur 3285 F.) 
Prix 2500 F. Jean Jacques 
NION Tel: (Bureau) 281 65 37. 
(Domicile) 336 65 47. 



VENDS SPECTRUM 48 KO + 
prise peritel + magneto + inter- 
face + manettes de jeux + 1 
manette + jeux Echoes + Co- 
balt + livre de programmation. 
Le tout 2700 F. a debattre. Tel: 
650 15 90. apres 18 Heures . 



T07 

VENDS T07 + basic + 16 KO 
+ manettes + magneto + Pul- 
sar II + Elimin. + 11 + Pingo + 
Chasseur + Carte France + 
Noix coco + Roger et Paulo + 
manuel et livres sur T07. En 
prime nombreux programmes de 
I'hebdo... Le tout pour 3390 F. 
A. DEMAILLE 12 rue Hocedez 
S59139 WATTIGNIES. Tel: (20) 
95 00 13. 

ACHETE EXT. 16 KO + exten- 
sion jeux + 2 manettes pour 
T07. Pascal THOMAS 35 rue 
du Soleil 68200 MULHOUSE. 
Tel: (85) 42 72 32. 

VENDS T07 + memo basic + 
ext. 16 K + 2 manettes + Trap 
+ Pictor + magneto + 20 pro- 
grammes sur cassettes + 2 
livres sur T07. Le lout : 4000 F. 
Tel: 709 63 42. apres 18 H. 

VENDS T07 unite centrale + 
basic + extension t manettes 
et synlhe : 3400 F. + logiciel 
pour T07 + pictor : 450 F. 
Jacky SENECHAL 30 rue Cou- 
tellier 60600 CLERMONT 
S'OISE. Tel: (4) 450 05 42. 

VENDS T07 + cassette memo 
7 basic : 2500 F. a debattre. 
Bruno BOUDIER domaine de la 
Pinte 39600 ARBOIS. Tel: (84) 
66 19 52. apres 18 H. 

VENDS T07 + basic + ma- 

?neto : 2000 F.+ pour T07, 
07 70 extension 16 KO + car- 
touche Trap + cartouche Pictor 
+ extension conlroleur avec 
mannettes el sortie son + 2 ma- 
nuels diniliation. Guillaume Gl- 
RARD. Tel: (40)31 00 61. 

VENDS pour T07 cartouches 
Pictor et Atonium + cassettes 
(Chasseur omega. II I'intrus et 
Initiation au langage basic "vol 
3") Prix a debattre. Thierry SO- 
MERLINCK 8 place des Tilleuls 
94470 BOISSY ST LEGER. Tel: 
569 78 20. 



TEXAS 

VENDS pour Tl 99/4A modules 
Burgertime Prix 230 F pratique 
du Tl tome 1 el programme et 
jeux Tl tome 1 Prix 50 F piece 
ACHETE mini memoire 400 F. 
Tel: 630 97 23 demander Didier. 

VENDS Tl 99/4A + basic 
etendu magneto K7 Texas avec 
cordon + 6 modules de jeux 
(Music Maker, Parsec, Munch- 
man, Car Wars etc.) + 1 cas- 
sette educative + joystick + 4 
manuels Prix 2800 F Alain GRA- 
NELLITet631 12 11. 



VENDS Tl 99/4A + cable + ma- 
nuel + joysticks + cable ma- 
gneto cassettes + magneto cas- 
settes + Treasure island + 
Wumpus + 50 jeux sur K7 + 
basic par sm Prix 2000 F adap- 
tateur secam Prix 400 F Arnaud 
ROBINE Tel 739 81 90 apres 18 
H 

VENDS pour Tl 99/4A modula- 
teur secam Prix 400 F CHER- 
CHE mini memoire + manuel 
trancais Tel (74) 30 01 37 Didier 
GALLE Jasseron 01 250 Ceyze- 
rtat 

VENDS Tl 99/4A + cable K7 + 
joysticks + 3 modules de jeux + 
module mini memoire Prix 2400 
F. Hopper + Burger Time + 
Mash + Jawbresaker + Othello 
+ Super demon + Munchman 
+ Ti Invaders + Treasure Island 
+ tombston city + Alpiner Prix 
160 F piece. Parsec Prix 210 F. 
P. COLIN 19 rue Gl Patton 
54270 Essey les nancy Tel 329 
38 47 

VENDS Tl 99/4A + Tl extended 
basic + minlmem + K7 + mo- 
dule Othello + manuel Prix 
3000 F a debatlre Thierry BER- 
THELOT 36 rue de bellechasse 
75008 PARIS. 

VENDS Tl 99/4A + cable K7 + 
manettes + ext basic + Echecs 
+ Tl Invaders + Parsec + Foot- 
ball + gestion de fichier + Sta- 
tistic anglais + Othello + 7 K7 
+ 3 manuels Tl + 3 revues Tl 
99 Prix 3000 F TRANCHANT D. 
Tel 907 38 00 

VENDS Tl 99/4A + modules Tl 
invaders + cables liaison ma- 
gneto K7 + manettes de jeux + 
25 jeux sur K7 + 12 program- 
mes Prix 1350 F + adaptateur 
antenne PHS 60 Prix 1350 F 
Eric MUHLHEIM Tel (88) 91 51 
82 apres 17 H 15 

VENDS Tl 99/4A basic etendu 
manettes des jeu cordon ma- 
gneto cassette modules de jeu 
football et chasse au wumpus 
Prix 1700 F GOMEZ Patrick Tel 
822 30 24 

VENDS Tl 99/4A + basic 
etendu + manuel + manettes + 
3 K7 aide prog + mash + sdat- 
tack + wumpus + systeme + 
ilander + 3 livres + 100 prog 
sur K7 + cable magneto (valeur: 
5900 F) Prix 3000 F. HOUDE 
Fredenc 5 rue roland garios 
34470 PEROLS Tel 16(67) 50 
02 40 

VENDS Tl 99/4A + peritel + 
cordon magneto + magneto 
SANYO alim. t- double joystick 
+ don de 3 modules texas 
Munch Man + Wumpus + Car 
Wars + don de la cassette 
Lunar Lander 2 Le tout 1800 F 
a debattre. DARRE Xavier 59 la 
mare des champs 91290 la 
roche Ollainvitle. 

VENDS Tl 99/4A + cordon peri- 
tel + alimentation + cable liai- 
son magneto K7 + extended 
basic manuel en frangais + mini 
memoire + manuel en francals 
+ K7 d'apprenlissage du basic 
+ modules de jeu Microsurgeon 
+ Moon Patrol + K7 La Tombe 
du Sorcier + joystick + nom- 
breuses K7 de programmes + 
nbx livres (les gds classiques du 
jeu pour voire Tl 99/4A, etc..) 
Prix 3000 F. Mr JOSSE 120 rte 
des Charmes 78320 Levis saint 
Norn Tel 461 12 18. 
VENDS pour Tl 99 operation 
fromage (necessite mini me- 
mory) carwars conseil financiers 
+ Irvres (decouverte du Tl 99 ) { 
Tl 99 a la conquele des jeux) 
(KT1 99 a I'affiche) Prix 500 F 
Tel (1) 350 38 17 apres 17 H 
VENDS Tl 99 + extended basic 
+ mini memory + joystick + 
parsec + Tl invaders + 50 pro- 
grammes environ + livres Prix 
2500 F Th CAMINADE 22 rue 
nd des champs 75006 PARIS 
VENDS pour Tl 99/4A modules 
Echec + Parsec + Car War + 
Soccer + Chrisholm Tril + Me- 
teor + Multiplication + Mission 
molns + Alligator Prix 600 F. 
Plus frais de remboursement ou 
6CO F payable d'avance par 
cheque Tel (8) 702 43 14 
VENDS Tl 99/4A peritel et ali- 
mentation + cordon magneto + 
magneto cassette + manette de 
Jeu + 2 modules Parsec et 
Tombstone + cassette pro- 
gramme d' application + techni- 
que de la programmation de jeu 
+ 1 livre {le Tl 99/4A a I'affiche) 
+ 2 cassettes de jeux (70 pro- 
grammes) + manuel Prix 3000 
F. BEISS Xavier BP 12 Mantes 
Rivieres 06800 MONTHERME 
Tel (24) 53 40 15 



LA VIE DE FAMILLE 

tie Jacques DOILLON 




Bon. moi i avais pas vu La Pi- 
rate", passke franchemenl sam di- 
sail rien. £ etait aphone ce jour-la. 
Ski lait que lorsqu'on m'a dil: 
"Viens voir le dernier Doillon", 
disons que j'ai fail la moue. ness- 
paaa. El alors je suis rests sur 
le cul. (vous inquietez pas. yavait 
un fauteuil qui me lendail ses 
petits bras courjes juste derriere 
moi). Cast bier, vraiment j'ai 
aime. beaucoup Sami FREY esl 
super, el la petite Mara GOYET. 
11 ans. est etonnanle, jamais elle 
ne flanche A noler aussi la parti- 
cipation active de Juliette BINO- 
CHE, qui joue aussi dans "Les 
Nanas". film qui ne vaul pas une 
pari de flan qu'on auran laissee 
dans le frigo pendant 15 jours. 
J'vais pas vous raconter I'histoire 
mais en 2 mots, e'est un mec qui 
est divorce qui s'est remarie, et 

Sui luus les week-end va voir sa 
lie a lui. que c'est la plus belle. 
sa princesse. la verite, j'te jure 
(cette vanne-la, j'vous la r'sortirai, 
e'm plait bien). et pis un jour, 
enfin un WE, i's'tirent tous les 2 a 
Madrid pour voir les GOYA au 
Prado, epatant, sans dec'... 
Bon. tout ca pour vous dire que 
C est ach'menl bien, et qui faut le 
voir, surloul vu les merdes qu'il y 
a en ce moment. 

All ! Au fait, le meilleur execo 
avec Les Favoris De La Lune cette 
semaine, c'est cui-la ! 



CAN 'ARRIVE QU'A MOI 

de Francis PERRIN 
(heureusement (J 




Vous prenez Pierre RICHARD, 
vous le teindez (ouais. bon ca 
va. chais bien quo chais pas 
causer le Francais) en brun. 
vous lui laites des implants de 
lifs sur le devanl, pas trop 
passk'apres on va I'conlondre 
avec Frankenstein, vous lui en- 
levez celui qu'il a sur la lan- 
gue. seulement pour ce film, 
sinon apres on va plus le 
r'connaitre dans les rues, et 
vous obtenez.....' 
FRANCISPERRIN. 
soi-meme en personne /'uni- 
que et tout Puis vous <ui Con- 
ner le ticket gagnant du Loto 
de la scmamc derniere. et 
keske vous obtenez 7 Vous 
voyez pas. eh bien pourtant 
c'est tres simple, c'est un su- 
perbe peM ptantage. modele 
du genre, dans tes trims qui 
veulent faire tire, et qu'amvent 
seulement a laire sourire. et 
encore passkon est sympa. 
C'est un film qua une histoire 
que meme ma p'tite soeur elle 
aurait pu lecrire a la recre de 
10 heures. deconnez pas elle 
a 12 ans. 

MORALITE: Si vous avez vrai- 
ment du trie a loutre en lair, 
allez-y. sinon laissez betonner. 
Francis PERRIN. (alias Fran- 
cois PEPIN dans le tilm. y 
s'est vraiment foule pour le 
nom). sen charge tout seul 
comme un grand. 



edito 



Et encore une page oil on va 
vous bassiner avec du cinoche 
comme si vous n'en aviez pas 
assez dans les aut' canards. 
Ei ben, juslement comme 
I'HHHebdo ne veul pasresler a 
fond de cale. on a decide d en 
mettre Le probleme c'esl que 
pour faire ca il n on! trouve que 
moi, CLOU, le locdu de ser- 
vice, dommage pour vous 



Cette semaine pas de true. 

super genial dement et tout. 

pour ca il faudra attendre la 

semaine prochaine. 

Trois valent vraiment le coup 

d'oeil: 

Les Favoris de la Lune, Dune. 

La Vie de Famille, le resie 

entre bof et beurkh. Sinon il 

fera beau sur toule la France 

surtout au sud ou il ne risque 

pas de neiger, sauf s'il fait plus 

froid. 




mon box-office 

1/ PARIS, TEXAS 

2' LES FAVORIS DE LUNE 

3,' LA VIE DE FAMILLE 

4 LES SAINTS INNOCENTS 
5' ANOTHER COUNTRY 
6 ROUGE GORGE 
7, TRAIN DENFER 

5 URGENCE 
9. DUNE 

10 PHILADELPHIA EXPERIMENT 

11- EL NORTE 

12' RAZORBACK 

13/ OUT OF ORDER 

14 LA COMPAGNIE DES LOUPS 




Bon. soyons clairs des le de- 
part, pour ce film il y aura 2 
sortes de spectateurs Ceux qui 
oni 1 1. lelivredlet les aulres (2) 
CLOU 

Bon, eh bien je vous le dis 
sans ambages, vous etes tous 
des tricheurs. vaus zallez tout 
de meme pas me faire croire 
que vous n'avez lu que le para- 
graphs qui vous concernait. 
rton ! Je connais les mecs dans 
volgenre, on fail comme si on 
I'avail lu et arrive a la fin de fa 
premiere partie. on s'tape le 
fronl en s'disanl "Bon sang, 
mais c'est bien siir ! Le book\ 
chlais pas lu !" el allons-y 
M'sieurs-Oames pour la 

deuxieme partie I Puisske c'est 
comme ca. j'va vous causer a 
lous sans discrimination cullu- 
relle 

En 3 films Lynch est passe par 
les 3 dilterents stades du reali- 
sateur moyen. J'explik, vous 
allez voir c'est tres simple. 
Pour ERASERHEAD (LABYRINTH 
MAN), il lui a fallu gale'rer 
comme un fou pour trouver le 
ble pour le laire. II comptait 
mettre en scene une histoire 
qu'il avail ecrite lui-meme. Son 
histoire etait dure, complexe el 
touchant un style doni le public 
n est pas Ires Iriand: le fanlastik 
Obscur. style HP LOVECRAFT ou 
dernierement 'Element of 
Crime - Les producteurs sont 
des hommes d argent et n'ont 
souvent que peu d'inleret pour 
le cinema au niveau artristique, 

ment c'est de depenser le moins 
pour gagner le plus, lis prcfe- 
rent produire un film debile avec 
Burt REYNOLDS, plutol qu'un 
genial avec CLOU. C'esl done 
pour ca que LYNCH t)ul laire 
son film avec sa Ihune et ga lui 
prit 5 ans Voila pour le premier 
stade. 

ERASERHEAD plul a Mel 
BROOKS (FRANKENSTEIN JU- 
NIOR, etc..} et celui-ci lui pro- 



DUNE de David LYNCH 




posa de produire son procham 
long-metrage: ainsi naquit ELE- 
PHANT MAN C'est le deuxieme 
stade. le producteur sail ce dont 
esl capable le realisateur et est 
pre! a risquer de i argent pour 
lui. 

Jusqu'ici on retrouve fa meme 
situation en France en revanche 
le Seme stade est particulier aux 
USA et peu frequent ctiez les 
Gaulois 

Le producteur dune Maior choi- 
sit un scenario et decide lui- 
meme du realisateur et souvent 
des acteurs qui feront le film. 
Les Majors soni les grosses 
maisons de produc' americai- 
nes: Paramount, Columbia (ra- 
cholog par Cooo Cola n y .i 2 
ans). la Fox. elc.Depuis 40 
ans Dino de LAURENTHS fait 
partie des monslres sacres de la 

Darryl F. Zanuck dans les 
annees 30 a 50. C'est lui et sa 
lille Ralfaella qui choisirent de 
produire ce film. Le realisateur 
pressenti au depart etait Ridley 
SCOTT, qui suite a divers pro- 
blemes partit tourner BLADE 
RUNNER. En voyant ELEPHANT 



MAN la Miss Ralfaella decida 
que le realisateur pour DUNE 
devail eire David LYNCH. II est 
sur qui! etait maitre sur le pla- 
teau et qu'il ecril le scenario, 
mais toujours les Laurentiis eu- 
reni leur mot a dire, aussi bien 
au niveau financier -c'est leur 
boulot -. qu'au niveau artistique 
-ce qui lest moins-, d'aulant 
pfus que la Miss etait conslam- 
menl sur la plateau. 
Bon el maintenant a quoi toute 
cette demonstration nous mene- 
1-elle ? Eh bien quen fin de 
compte, Lynch a effectue un tra- 
vail de commande, n'etant que 
le sous-fifre de ses magnats de 
patrons, les Laurentiis. 
Voila, done je n'en veux pas a 
Lynch, j'attends sa prochaine 
merveille. avec des producteurs 
dilferents, j'espere. Quant aux 

pas non plus (je suis d'un ma- 
gnanime ces temps-ci) car, vu 
ce qu'ils ont produit ces dernie- 
res annees on ne pouvait s'al- 
tendre a mieux. 

(1) Si vous avez lu le book 
(ca c'est du branche). vous 



serez oecus comme moi. Je suis 
encore sous le choc C'est 
beau, la les mecs izon pas le- 
sine sur les moyens- 42 millions 
de S S S I - moyenne des pro- 
ductions franchises 12 millions 
de Francs. 35 fois moins I Ca 
yapa a dire c'est beau. Mais le 
gros, alors la vraiment gros 
probleme du film, c'est que le 
mec qui joue Paul ATREIDES, le 
heros qui se prend pour Super- 
man, ben.. C'est pas ca. II esl 
trop beau, trop minet-mignon, 
j'y crois pas une minute. Par 
exemple. lorsqu'ii boit de la bile 
de ver que ya que les Bene Ges- 
serit, les grandes pretresses, 
qui seules peuvent le boire, et 
que les mecs i crevent tous, 
sauf lui comme par ouah ! rrr ! 
zazar t ! eh ben la. j'y crois pas. 
Si vous ne comprenez pas ce 
que j'raconte. c est que vous 
etes de sales menteurs et que 
vous zavez meme pas lu le 
book I 

Non, ce qu'il aurait fallu c'est 
Delon jeune ou dans ce genre, 
un type qui ait une gueule. quoi, 
pas le modele de serie style Pri- 
sunic qui nouzon sorti, mais ga 
c'est la produc' qui choisiL 

(2) Si vous n'avez pas lu le 
book, vous serez peut-etre 
assez content, mais vous vous 
lerez certainement chier par mo- 
ments, surtout en 2h20, c'esl le 
bouquin qui veul ca ! Vous allez 
parfois nager dans la melasse et 
en plus, vous allez croire qu'on 
vous prend pour des cons: on 
n'arrete pas pendant tout le tilm 
de vous repeter que i'epice (' ) 
est tres importante et palati et 
patata. Moraine allez le voir, ca 
fait quand meme du bien de se 
prendre une tranche de belles 
images dans ta tete de temps en 
temps ! 

(" ) c'est la drogue qui n'existe 
que sur la planete Dune. Tout le 
monde en a besoin car elle 
donne force, longevile. (esses 
roses et fait le menache quand 
la Madame elle est pas la. 
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Ouaah ' le pied ! Si ya bien un 
film qu a me me son Prix Special 
du Jury a la Mostra de Venise. 
c'est bien celui-ci. Faut voir que 
Venise est le 2eme grand festival 
international de cinoche apres 
Cannes 

Ce fiim esl dement, c'est le seul 
que |e connaisse oil on en a rien a 
cirer des personnages ou de leur 
texte. mais alors rien losseliani 
aurait pu prendre n'importe quels 



autres acteurs que ca n aura.il rien 
change. Remarquez. on I'com- 
prend vu quen fait il raconte I'his- 
toire dun tableau et d'une vais- 
selle qui s'aimaient d'amour 
tendre, mais commenl s'y prendre 
quand on est la-haul. Les objets 
sont successivement voles, reven- 
dus, revoles, rerevendus, rerevo- 
les. rererevendus, etc... 
Mais ce n est pas parte qu'on se 
fiche des personnages qu'ils per- 
dent de leur importance, lis sent 
essentiels. car ils dnnnent leur dy- 
namique au tableau et a la vais- 
selle, apres tout ce sont bien les 
hommes qui les om cree's au de- 
part, ce nest que justice. 
Nos 2 heros le tableau et la vais- 
selle bien sur. passant de mains 
en mains, inierviennent dans difle- 
rentes historietles qui sentrecho- 
quent et s enlrelacent. 
Ainsi le marchand d'armes vereux 
est mariee a la coquette plcine 
d'amants Cette derniere achete ia 
vaisselle a Drouot el la casse La 
vaisselle cassee est recuperee par 
leboueur qui la donne a son amie 
la prostituee, ou comme le dirait 
ma licieu semen t Gerard BRACH (le 
co-scenariste.) 'I amie qui lait des 
heures supplements ires sur le 
trottoir'. et ainsi de suite... 
Si vous voulez vraiment avoir une 
notion de ce que sonl les difleren- 
tes relations dans ce film, reportez 
vous au tableau, qui vous donnera 
une idee de combien c esl compli- 
guft. 

Si j'vous ai fait ce tableau, c'est 
pas pour des prunes, mais aussi 
pour vous donner une idee de 
comment Otar IOSSELIANI lait ses 
films. 

Sachez lout d'abord que c'est un 
Cineaste georgien (en URSSi qui 
Irauva plus ngolo de faire son 
3eme film avec Gerard BRACH 
scenanste francais prohxe (PIPI- 



CACADODO. LA FEMME DE MON 
POTE, LE BAL DES VAMPIRES, 
entre autres). Sa methode de tra- 
vail esl assez particuliere et Brach 
eut dailieursdu mala s'y adapter. 
Les scenes du film sonl no tees 
sur des liches de cartons colorees 
el sonl disposees dans une boite. 
'Oh ! ben cette scene, e'm'platl 
pas la ou elle esl, ch 'trouve 
qu'une fiche bleue a cote d une 
matron, ca lait desoidre. mettons- 
la pluldt a cote d'une rose !'. On 
se doute du nombre de films dlf- 
ferenls auxquelles on arnverait, si 
les gouts el les couleurs du reali- 
sateur changeaient lous les jours I 
Ce qui est curieux c'est qu'on a 
I impression que le realisateur se 
loul du temps . non pas que les 
scenes soient longues. au 
s'cours, mais ske j'veux dire c'est 
que Taction peut aussi bien se 
passer en un jour qu'en un mois, 
de toute maniere on s'en fout, 
Enfin. c'est trufle de gags qui 
m'ont lait bien rire. entre autre une 
scene oil on entend en voix off un 
mec qui enumere une liste d ob- 
lets. pendant qu'on voit a la tele 
remission avec la nana qui ra- 
conte des hisloires en langage 
sourd-ei-muet. Ires rigolo 
Voila. pour moi ca c'est du cino- 
che l Mais ca ne vaut quand 
meme pas "BRAZIL" que donl 
j'vous causerai la s'maine pro- 
chaine. 

P.S : Le litre du film vienl dune 
phrase tiree de "HENRY IV.acte I, 
scene 2' "Pourquoi nous appeile-t- 
on les voleurs ? Nous qui 
sommes les gardes du corps de 
Diane dans la foret. les chevaliers 
des Tenebres. les Favoris de la 
Lune." Aulre facon personnels de 
delinir le film Du malheur d'etre 
riche et de le rester. ou la joie 
d'etre pauvre et de devemr riche" 



RAZORBACK 

de Russel MAULCAHY 




El encore un film du festival 
d'Avoriaz, un ! Pour une fois qu'i 
zen sortent quelques-uns juste 
apres le lestival ' 

C'esl un film qu'il esl australien, 
qui se passe en Australie avec des 
kangourous et tout le tintouin, el 
pourtant c'est pas un depliant tou- 
ristik. surement pas I 
Y parait que dans ce pays de sau- 
vages (vivent-ils ou ne vivent-ils 
pas dans des maisons en dur. 
telle esl la question) il existe des 
sangliers mutants qui son! super 
gros et hachement mechanl et ga 
s'appelle un razorback, genre 
Gremlin puissance 56, sans I'arro- 
sage. C'est I'histoire d'un pauv' 
Ricain prop' sur fui BCBG. bien 
sous tous rapports, qui essaie de 
Zigouiller ce pauvre razorback 
qu'avait rien demande a personne 
Imaginez un peu le ridicule de 
cette situation (SPA vaincra I SPA 
vaincra '). passke sa femme s'est 
faile bouffer par la beete, vraiment 
pas de quoi passer le reveillon la- 
dessus. Le film tourne bien, ca 
m'a foulu les chtons. heureuse- 
ment j'etais avec une copine Si 
vous aimez ce genre allez-y, vous 
serez pas trop decus. 



PETER LE CHAT 

Dessin anime de Stig LAS- 
SEBY el Jan GISSBERG 
Ca fait 3 semames que votre 
petite soeur ou votre petit trero 
vous tanne pour que vous 
lemmeniez au cinoche voir je 
n'sais quel navel, el bien 
cette semaine vous etes 
sauves Dieu existerail-il, moi 
qui ne prie plus depuis temps 
damne ? II existe tres certaine- 
ment un esprit qui veille sur 
votre Iranquillite. qui comprend 
comme il esl dur de faire plai- 
sir a mam an pour sorti r celle 
satanee petile soeur pour qui il 
faut toujours perdre quand on 
joue a Lode Runner. La preuve 
de son existence, eh bien elle 
esl la devanl vous, mesdames 



pres de chez v 






PETER le chat, ou le bien 
nomme. Je dis ga pour ceux 
qui auraient notre edition en 
braille entre les mains et done 
ne pourraiont pas voir la photo, 
car il s'agit be! et bien d'un 
chat. Le chat, felis vulgus pour 
les intimes. est un mammifere 
digitigrade, aux ongles relracli- 
les, propriete dument copies 
par M.Daray, invenleur dun 
couteau qui porte son nom ap- 
precie par un certain type de 
del inqu ants. 

Ne me dites pas que j'etais 
cense vous parler d'un film, ga 
je I'sais bien. vous allez pas 
mapprendre mon boulot. non 
pfus. Done comme je I'disais- 
je. c'est i'histoire d'un chai, en 
particulier de ses avenlures ur- 
baines. Ce nest pourtant pas 
un remake de Fril2 Ze Quat' el 
ce pour 3 raisons: 

- La premiere, i s'appelle pas 
Fritz, nom allemand pour un 
chat ricain. (logique). mais 
Peter, nom anglais pour un 
chal suedois, (nom moms logi- 
que). 

- La deuxieme, il a pas de 
queue, Fritz, lui, en a une et 
pour cause I Done c'est pas 

- Et la troisieme. passke 
jamais 2 sans 3. 

Alors il lui arrive des las 
d'aventures achement palpi- 
tantes. et tout ga passk il a pas 
de queue, le pauvre ' 
Derniere chose, noubliez pas 
d'apporter des bonbeks pour le 
p'til frere. comme i va croire 
que c'esl votre jour de bonte 
passke vous lemmenez au ci- 
noche. i va vous en rectamer. 
Sur ces bons conseils. allez-y 
et dormez bien. 



teloche 



editorial 



En quete sur I'anlenne. 
Vous esperez passer la soi- 
ree tranquille, bien calteutres 
dans vos nids douillets, 
HORREUR. MALHEUR, lan- 
goisse et la violence debar- 
quenl chez vous via le petit 
ecran. Le sexe ne faisanl 
plus recette (ou demeuranl 
trop choquanl cl article MOI 
JE) les chaines vous jettent 
de la chair fraiche en pature. 
Les cadavres pleuvent, le 
sang gicle, le suspense est 
haletant, brel le polar est toi 
(et en plus vous aimez ca, 
57,5 pour cent despectateurs 

Eour un film aussi moyen que 
A BALANCE, alors la vous 
deconnez), 

Soupe traditionnelte sur A2 
avec la poursuite (c'est plus 
de leur age) des dramatiques 
LES 5 DERNIERES MINU- 
TES et COMMISSA1RE MAI- 
GRET. Les heros sont 
commissaires, vieux, bedon- 
nanls et moralistes. I'enquele 
ramollo et psychologique. 
Potage MINESTRONE avec 
le frisson du lundi sur FR 3, 




teloche 



»•••<>„ 



une soiree ou il y a a boire et 
a manger. 
TF 1 alterne les consommes 
a deguster (HITCHCOCK. 
HUSTON) et les bouillons in- 
sipides (GIOVANNI. DAVIS) 
au moins une lois par se- 
maine. 

Vous reprendrez bien un peu 
de viande troide. degustez 
nos series: 

SERIE NOIRE sur TF 1. IN- 
TRIGUES sur FR 3. CLE- 
MENCE ALETTI et HOTEL 
DE POLICE sur A2. SERIE 
NOIRE est souvent rapide, 
violent. saignant, INTRI- 
GUES est plus discursif, tes 
situations originales, la (in 
inattendue. Les 2 series d'A2 
innovent et donnent une 
image difterente du crime et 
des flics. Premier service, un 
commissaire jeune, femme, 
une enquete internationale, 
des crimes importants. 
Deuxieme service la vie quo- 
tidienne de jeunes inspec- 
teurs, des debts minables ei 
multiples qui s'entrecroisent. 
BOMBYX 



&£ 



La c/e de Vevasion 
KEY LARGO • 



Film de J. Huston (1947) 
Atmosphere, atmospheres, ce 
lilm sue I'alcool. la tatigue, la 
literature d'aventure , brel il 
s'agit dun lilm noir. L'ombre 
d' Hemingway traine en lili- 

?rane dans ces lioux dechus. 
bus voulez d'autres noms 
evocateurs: HUMPHREY BO- 
GART, LAUREN BACALL. E. 
G ROBINSON synonymes 
d'aventurier au grand coeur.de 
fllle de mauvaise vie. de 



retrouvenl a KEY LARGO, la 
derniere des iles Key West, la 
ou la terre se perd dans la 
mer. au tin fond de la Floride. 
Cul-de-sac geologique des 
Elats-Unis. station terminus 
pour les marginaux de tous 
genres, la oO 'on n<i«» dans le 

whiskey on the rock (run 
around the clock) les bleus du 
del. de la mer et de 
l'ame.(pour le blue lagoon un 
tiers de curacao, un tiers de 
gin. un tiers de J. Daniels. 2 
tiers de TROPICANA).(pub) 
Sur cet embarcadire vers le 
neant (deuxieme Fie a droile) 




les passagers y abouiissent 
par hasard. fuyant eux-memes 
ou la police. On y retrouve 
BOGIE ancien otticier demobi- 
lise, inadapte a la vie civile. 
LAURIE jeune femme qui a de 
la bouteille. G. gangster, vieux 
caid des anneas 30. poursuivi 
par le FBI et qui tente tie 
sechapper au MEXIQUE. 
Huis-clos dramalique, dur. 
style descente aux enters 
(allez-y de confiance le bar est 
bien toumi). 

Diffusion le 18 a 20H35 sur 
TF1. 
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Onanisme physico-spirituel 
MOI... JE • 



Le maintenant celebre duo 
Pascale Breugnot-Bemard 
Bouthier, sevit une fois de 
plus sur nos ecrans pour 
notre et votre plus grand plai- 
sir. Ce mois-ci. 5 sujets au 
menu, moins 2 sujets quasi 
quelconques. il reste (a vos 
bouliers) 3 sujets excellents. 
■ ILS VOIENT DES ANGES 
PARTOUT. 

Les anges ont-il un sexe ? 
Mais la nest pas la question. 
Avant de savoir si ils en ont 
un, savez-vous ou en rencon- 
trer... Oh surprise, ils sont 
partout. De I'assureur au 
technicien video, en passant 
par I'ingenieur conseil, dam- 
ned, we are encercled. Et ils 
sont sludieux ces anges la. 
Ils vont a lecole d'anges 
(MAIS SI!) et II yen a mime 
certains qui son! deja anges 
ES GABRIEL, lis son! gais, 
ils font la lite tous les same- 
dis et je vous le garanlis, ce 
sont des soirees "angeli- 
ques". Savez-vous que Mi- 
chelle Mercier n'a jamais 6te 
leur marquise ? 
• MAGOUILLE BLUES. 
Par les temps qui courent. la 
debrouille va bon train. Dans 
ce reportage on se rend 
compte que dans les endroits 
chebrans on mange tout ce 
qu'il y a de plus frais, par 
contre dans les poubelles de 
la SNCF et des grands ma- 
gasins, c'est moins ca. En re- 
vanche, pour se vetir. le 
grand couturier "POUBELLE" 
s'est mis en quatre. HELAS ? 
II n'esl ouvert que la nuit. 
Maintenant on dira tiens tu 
t'habilles aussi chez "Pou- 
belle" 7 




■ LE RADADA EN PRISON. 

Plutot tristoune, pour ne pas 
dire "pa four les boules". 
Hommes. femmes me me 
combat. L' imagination gatope 
quand on est seul(e). Tout y 
passe. Des idees plein les 
yeux pour occuper vos ton- 
gues soirees solitaires. 
Les commentaires sont 
censes etre crus. Mais la di- 
rection de la chaine a decide 
de ne pas agresser vos oreil- 
les. et a coupe certains dialo- 
gues. Je ne peux done pas 
vous dire a quo! ressemble la 
nouvelle version de ce repor- 
tage. Messieurs les respon- 
sables de chaines. quand ar- 
reterez-vous de prendre vos 
t&lespectaleurs pour des in- 
nocents.. Ils ont les mains 
pleines voussavez... 

Diffusion le 20 a 22h10 sur 



Lundi 18 Fevrier 


20h30 


C + . 


BARBE DOR ET LES PIRATES 
(1983), (laventure holly woo dienne 
piratee) 


20h35 


TF 1 


KEY LARGO (voir article) * 


20h35 


FR 3 


ECHEC A LORGANISATION (1973). 
lilm (policier) de J. Flynn 


20h35 


A2 


GRAND ECHIQUIER avec Ivry Giltis 


22ht5 


TF 1 


ETOILES ET TOILES (magazine pour 

cinephages) 

THALASSA (magazine qui garde le cap) 


23h05 


FR3 


Mardi 19 Fevrier 


20h30 


C - 


LA BOUM 2 (1983). film clone du pre- 


20h35 


TF 1 


ENIGMES DU BOUT DU MONDE (jeu 

geographique et sportit) 

LA MANDARINE (1972). lilm (comedie 


20h35 


FR 3 






fruitee) dE.Molinaro avec A. Girardot. P. 






Noire!. M. Renaud, M-H. Breillat. 


20h40 


A2 


ALLONS Z' ENFANTS 


21h35 


TF 1 


ODYSSEE COUSTEAU: Le Nil (2) 


22h20 


A2 


LIRE C'EST VIVRE tcorrespondance J. 
Drouet-Victor Hugo, changez a Gon- 


00h05 


C + 


LES MONTAGNARDS SONT LA 
(1938), film (burlesque) de G Blystone 
avec LAUREL ET HARDY 


Mercredi 20 Fevrier 


20h35 


TF1 


DALLAS (illustration mouvement perpe- 
tuel) 


20h35 


A2 


RODEO GIRL (voir article) ■ 




FR 3 


CADENCE 3 (vaneies avanees) 




TF 1 


MADELAINE (portrait de M. Renaud) 


21h50 


c + 


DE SI GENTILS PETITS MONSTRES 
(1980) 


22h10 


A2 


MOI...JE (voir article) • 


22r>20 


FR 3 


JULIETTE ET GALATHEE dramalique 


Jeudi 21 Fevrier 


20h30 


C* 


UNE LANGOUSTE AU PETIT DEJEU- 
NER (lilm indigeste) 


20h35 


A2 


L AMOUR EN HERITAGE rf 7 (sene 

petit budget) 

LE TRESOR (1970), lilm sri-lankai 


20h35 


FR3 


20h35 


TF1 


AU NOM DE TOUS LES MIENS rf 3 

(serie qui n'esl pas mienne) 


21h35 


A2 


DECAUX STORY: L'homme qui voulait 
empecher la guerre 


2 H J>35 


TF 1 


INFOVISION (magazine d'actualites) 


22h00 


C + 


NAPOLEON (voir article rf 69) 


Vendredi 22 Fevrier 


20h35 


A2 


CHATEAUVALLON 


20h35 


FR3 


FAITS DE SOCIETE (magazine d infor- 
mations) 


20h35 


TF1 


LE JEU DE LA VERITE avec Guy 
Betios 


21h35 


A2 


APOSTROPHES (les convulsions de 
I'Histoire) 


21h35 


FR3 


MACADAM (varieles francaises) 
OTHELLO (voir article)U 


21h45 


c + 


21h50 


TF 1 


LE ROI CLOS, piece dA. de Richaud 


23h00 


A2 


PIPICACADODO (1979), film (pampers) 
de M. Fen-em 


00h45 


C + 


NAPOLEON (voir article rf 69) 


Samedi 23 Fevrier 




A2 


CHAMPS-ELYSEES (Michou presente) 




TF 1 


PITIE POUR LES RATS (voir article)^. 


20t>35 


FR 3 


DISNEY CHANNEL (retombez en en- 
fance) 


22h05 


A2 


LES ENFANTS DU ROCK (vanetes 
rock) 




FR 3 


DYNASTIE 




TF1 


DROIT DE REPONSE 


23h00 


C + 


ANDROIDE (1983), lilm (ersatz) avec 
Klaus Kmski 


00ht5 


C + 


LE BAL (voir article n° 69) 


Dimanche 24 Fevrier 






■ HOTEL DE POLICE (sene policiere) 


20h30 


c + 


• UN AMOUR DE SWANN (1983), film de 
V. Schlondorf avec Alain Delon et Or- 
nella Muti 




TF1 


■ JAI EPOUSE UNE OMBRE (voir article) 






■ LE GRAND RAID (jeu daventures) 


20h35 


FR 3 


ARCHITECTURE ET GEOGRAPHIE 
SACREE (documentaire mystique) 


21b35 


A2 


: POUR LE MEILLEUR ET POUR LE 
PIRE if 5 : CUBA (reportage sur les re- 
lations hommes-lemmes. vamos a la 
playa) 


22h30 


FR 3 


• ENTENTE CORDIALS (1939), film (CO- 
medie historique) de M. L'Herbier avec 
G Moday et V. Francen 




yy G/o/'re au lasso 

w RODEO GIRL ■ 



Telefilm de J. Cooper avec Ka- 
tharine Ross et Bo Hopkins 
Risume: Femme et fllle d'un 
champion du rodeo. Kate reve 
de participer au circuit de 
rodeo feminin. Son man, bon 
cheval. lui lache la bride, il la 
laisse participer a una 
6preuve. Elle prend gout a la 
competition el decide de 
concourir pour le litre leminin. 
Devant les piles de linge el de 
vaisselle qui s'accumulent. 
Jack rue dans les brancards a 
I'annonce de cette nouvelle. 
L attelage familial est tire a hue 
et a dia et le brave Jack monte 
sur ses grands chevaux lors- 
que Kale, enceinte, refuse 
d'abandonner le RODEO 
CIRCUS. Notre valeureux cow- 
boy reprendra-t-il les renes du 
menage ? 

Une excellente interpretation, 
un bon sujet ne suffisent pas a 
sauver ce telelilm de la medio- 
crity tradilionnelle des produc- 




"John Wayne 85 (-60-85)" 

lions US. Dommage pa ne 
manquait pas de selles. 
Diffusion le 20 a 20h35 sur 



tit: 



Laissez-les vivre ! 

PITIE POUR LES RATS a 



Serie Noire de J. Ertaud avec Ro- 
land Oumas. Xavier Deluc et Ge- 
nevieve Fontanel. 

Je vous brosse le tableau. Une fa- 
mine style France profonde. un 
couple (Julien et Yvonne) d'arti- 
sans modestesqui vit au bord de 
la Marne. Ils travaillent avec 
I'amour de la belle ouvrage. a 
lancienne. respectueux de leur 
clientele. Ce sont d" honnetes 
cambrioleufs. 

Ils fuyatent tous les deux comme 
dbabitude par les toils, apres 
avoir visile une villa, lorsqu'un 
coup de feu eclate blessant Julien 
Yvonne va pas tarder a y aasser 
lorsque un quatrieme quidam abat 
le perturnateur des ballades au 
clait de lune. Quo vadis ? 
Un terrorists de passage dans 
notre beau pays (mais que fait 
6R0U33ARD) faisait justement 
son jogging dans le voisinage. 
Serviabie. il leur propose de les 
raccompagner criez eux Agreable- 
ment surpris de reocontrer un 




jeune avec d'aussi bonnes manu- 
res, ils lui oftrent I'hospitatite (Ah! 
le savoir vivre d'antan]. Maisnon: 
ils pas mlroduit le loup dans la 
bergerie? Justement Solange leur 
lille ne demande qu'a etre cro- 
quee. Ce n'est ni PORTE-BON- 
HEUR. ni AU NOM DE LAMOUR 
mais bien une SERIE NOIRE. Le 
rythme est tres soutenu, les pislo- 
lets au premier plan, la pression 
constante. 

Diffusion le 23 a 20h35 sur 



Killer's game ^^& 

OTHELLO D WSW 



Film d'Orson WELLES (1960) 
d'apres la piece de SHAKES- 
PEARE(1595) 

Deux genies (sans bouillir) 
sont dans un bateau. Le plus 
gros (WELLES) est negre et 
le plus mig' (SHAKES- 
PEARE) porte une traise 
(non c est pas un script-pub 
pour MAMI-NOVA). Le plus 
maigre est poll, il souhaite la 
bienvenue: hole hello. Duel 
SHAKESPEARE versus 

WELLES, le plus mag a I'eau 
tombe a lo, I'autre essaie de 
le sauver. il crie 'otez' I'eau 
et OTHELLO, surgi des tlots, 
marcha vers la cdte. II se di- 
rigea vers lauberge la plus 
proche, une ancienne pro- 
priety un peu dilabree de la 
marquise d'O. II frappa a la 
porte de I'Hotel O et en de- 
crocha I'enseigne. Merde. 
dit-il, jai enlevi le O. II antra 
et se secha aupres du leu. II 
retira et essora ses chaus- 
ses, enleva ses bas (DDim- 
Dim-Dim-Oam-Dom) el dte le 
haul (de chausse). 
L'aubergiste riveilla alors 
SHAKESPEARE, ivre-mort et 
le jeta dehors. Ce dernier 
perdit tout souvenir de sa 
transe alcoolique et ecrivit 
une autre histoire que void. 
OTHELLO est marie a DES- 
DEMONE IAGO. conlidenl 




du couple, aime DESDE- 
MONE qui n'en a rien a (ou- 
tre. Ame aigrie, IAGO ra- 
conte des salades a 
OTHELLO, un pigeon de pre- 
miere. La Zizanie (une autre 
dimone) s'insinue entre les 
ipoux et OTHELLO la trucide 
par jalousie. Ay ant perdu 
I'objet de leurs obsessions 
nos deux pleurent sur leurs 
conneries respect Ives. (Ah I 
Si IAGO avait aimi 
OTHELLO) 
Diffusion du chef d'oeuvre 
le 22 a 21h45 sur C 4 
V.O. 



named a witch de Robin Davis 1983 
C'est dinnnngue la vie On ne se doute 
de rien. et comme 9a. un jour, quelque 
part n imports oil. tout se joue. Pour la 
leune et charmante Helene, (Nathalie 
Baye) c'est dans un train que tout com- 
mence Voila done notre dehcieuse he- 
roine, mnocenle. heureuse de vivre et 
de la dormer (la vie elle est enceinte) 
Elle rencontre un jeune couple dont la 
femme elle aussi est enceinte. Oh! 
Quelle coincidence, mais une coinci- 
dence n arnvant jamais seule, un voya- 



geur maladroit tache la robe rj'Helene. 
et done par consequent, elle est saaale 
Patricia(la jeune temme) qui comme par 
hasard fait la meme taille de robe 
qu'ttelene lui propose une des siennes 
Et c'est parti... 

On reconnait bien la la patte vicieuse de 
ce bon vieux destin. A partir rte cet ins- 
tant iln'y a pas detaison que casarrete. 
bien evidemmentle train deraille, tout le 
monde meurt saut Helfine qui je vous le 
rappelle porte une robe de Patricia. 
Vcus suive; 1 Mais la dU le destin prend 



Inute son ampleur, c'est que ce n'esl 
pas Helene qui prend la place de Patri- 
cia, ce sont les Beaux-parents de Patri- 
cia qui pfennent Helene pour leur belle- 
fille (incredible isn't it) Et comme ces 
derniers sont riches, vcus ne pensez 
done pas qu'Helene va dgvoiler le pot- 
aux-ruses ou le poteau-rose. Qu'auriez- 
vcus fait a sa place? 
Ce dim parait obscur, erreur il est carre- 
ment noir Bon scenario servi par lions 
comediens ~ bon lilm. CQFD. 
Diffusion le 24 I 20H35 sur TF1, 




PUBLICITE 




H6 oui, de la publicite dans Hebdogiciel, nous rentrons dans le rang? Vous rigolez ou 



quoi? Les annonceurs que vous voyez la, Id, dessous se sont engages a faire 5 % de 
remise aux abonnes de I'hebdo sur TOUT le magasin, y compris sur les ordinateurs, les 
fournitures et les peripheriques. C'est pas de la bonne publicite', ca, Madame? 



S.A. LHOMME 

NOMBREUSES MARQUES DISPONIBLES 
LOGICIELS, LIVRES 

CONSEILS EN INFORMATIQUE 

INITIATION A L INFORMATIQUE POUR LES 

ADHERENTS DE LA CASE MICROCLUB 



TOUTE LA MICRO CHEZ 
S.A. LHOMME 

5, rue Fanfrelin 16000 Ansouleme 
(45) 95.27.37. 




, THOMSON-M05-T07.70 

■ POINT CONSEIL TIFY 

i MSX . YAM AHA . SANYO . AMSTRAD 

i LIBRAIRIE 



mumm 



l commodore 

COLECOVISION" 

CBS 



iinc=l3ii— 

grata 

ue Paillot de Montabert 

10000 TflOYES 
Tel |25) 73.28 49 



Present 6 Fexposition Intor- 
matlque SIMABE (bid de Bel- 



VIDEO I07 INFORMATIQUE 

♦ ♦ ♦ ♦ ♦ 



PLACE DES FETES 
75019 PARIS 



QL SINCLAIR DISPONIBLE 

COMMODORE, ORIC, AMSTRAD 

EXELVISION 



Tel. : 201.46.09 



•n.m.i.R 

Automatismes - Micro-Informatique Rouennaise 
. U INFORMATIQUE A TOGS LES NIVEAUX 

- AMSTRAD - MSX 

- COMMODORE 64 - SPECTRUM 

- ELECTRON -2X81 

- EXELVISION - SANYO 550 et 555 
-M05 -ORIC/ATMOS 

- TO?. 70 

. PLUS DE 600 LOGICIELS POUR LES MICROS 

■ Creation de logiciels personnalises pour PME/PMI 

• Formation, mise en oeuore, service apres-oente 

AMIR c'est aussi les logiciels utilitaires et les 
jeux pour ATMOS : EDITEXT. AMIFICHE, KIT 
FUNCTION, et bientot APIS, STAREX, LE 
PRINCE KHARNA. 
50, rue de Fontenelle 76000 ROUEN 
Tel: C35> 88-56-34 



VIDEO TROC 

VENTE - ECHANGE - DEPOT DE 
TOUT MATERIEL VIDEO ET MICRO- 
INFORMATIQUE - LOCATION DE JEUX 

\NOSPRIXNEUFS!\ 



i OUUUBOHr.M + ljeu:2690F U-.CIi I R [ilsOL F.TTL + ljeu:28WF 

M<>\rri:iRi.lH.l.r.l R :2490F Momlcur Fermi Ambre :930 F 

OARim \l SIX A\l : 1700 F MSX CANON V20: 2990 F 

DISQUETTE NASHUA (XIO) - 149 F fmprfmm BROTHER 
AMSTRAD OTK cordon : 2 790 F 

+ montlrui eouleur: 4496 F 

+ nmmltur monochrome : 2 990 F 

OUVERT DU MARDI A V SAMED1 DE 10 H A 19 H 00 
LE LUNDI : DE 14 H A 19 H 

M bis. rue de Charemon 75012 PARIS 

tit : 342.18.54 

metro : gore de Lyon, Ledni Rollin 



BMP 



LA MICRO INFORMATIQUE A LYON 



20, rue SERVIANT €9003 Lyon 

lei.: (7) 860.84.27 



LE SPECIALISTS DES LOGICIELS 
APPLE ET THOMSON MOS &T07 



L'EXPERIENCE MICROPUS 

La Maison de I'lnformatique 
. MICRO-ORDINATEURS PERSONNELS : 



-ORIC 

- SINCLAIR 

- THOMSON 

- COMMODORE 
-LAZER 

- CANON 



- ALICE 

- ELECTRON 
-MSX 

- AMSTRAD 

- EXEL 100 
-DRAGON 



Nous disposons de la quasi totalite des nccessoires 
et peripheriques associes a nos marques et ceci 
durant toute I'annee. 

, COURS DE FORMATION 

15 cours GAMBETTA 
34000 MONTPELLIER 

(67) 92.58.83 



VISMO 

Vente informatique service micro ordinateurs 

ORIC, SINCLAIR, AMSTRAD 

MoniteuTS eouleur et N/B. 

Tous peripheriques 

ASSEMBLEUR MONAMS 
Recommande par Hebdogiciel 

84, bd Beaumarchais 75011 PARIS 
12, bd de Reuilly 75012 PARIS 



ABONNES, 

si vous avez un probleme avec une de 

ces boutiques, vous savez a qui vous 

adresser? Je ne vous fais pas de des- 

sin? 



ANNONCEURS, 

vous avez envie de vous lancer dans 
I'aventure? Vous etes prets a consentlr 
S % de remise sur toute votre boutique 
pour la voir envahie de programmeurs 
fous? Ecrlvez-nous, nous vous ferons 
payer tres cher le centimetre carre de 
publicite! 



un SPECIALISTE, c'est PLUS SUR et. 
... c'est toujours M0INS CHER ! 

MICR®METZ 

■ ■ 

mkro-informaiique pour ious 



.\i.\\,WM^.uM.\JMM.\i.\ixAAiJaimm 



compatibles 
19, r. dela Fontaine 
57000 METZ 



Zenith - Toshiba 

H Place de la x -i1^ > 
Republique ^ 



& 




*'J&* 



grand cboix cfe logiciels 

libreine specialist - ' "^ 

nos PRIX "SERVICE COMPRIS" X -jAA 






LES BOUTIQUES DES 
BRANCHES CABLES 



TOUS LES LOGICIELS FROM USA 
pour ATARI, CMB 64, APPLE, 
COLECO. 

m avenue de Villiers 75017 PARIS 
766.11.77 

163 avenue du Maine 7S014 PARIS 
541.41.63 



la page pedagogique 



la page pedago~ 



Cette semaine, Jean Claude MARTEAU, vous propose un tres efficace programme d'entrainement et de contrdle des tables de 
multiplications. Que les tous petits comprennent bien que 2 fois 2 font 4, meme si c'est a coups de marteau qu'il faut le leur faire 
rentrer dans la tete ! 



TABLE X sur COMMODORE 64 



I IPiPiMH 111) ' 



5 Ren ♦***»**»♦**<*»*»**»*»* 

10 REM * IBlLE'K * 

15 REM • • 

39 REM * PAR J-CL MARTERU • 

25 REM * <l/12^1904J * 

30 REM *♦ + + **«■•. **>r **«««**•• 

35 ■ 

40 

45 PuKE53280-3PQKE53281,2POKE54296.15 POKE542B6. 15; V-34272 

50 PRINT'TIT 

55 PRINT"I»I I 1 I 1 1 1 1 1 1 I 1 1 " 

60 print'jw i 1 1 ei i ii i ;■ a 3i a 4ii a i 6i i ?m a em * sm ■■ 

65 FORT"0TO9-PRINT"III I r"~1 I I I I I I I I I " 
70 PRINT'-IIM I 1 I I 1 I I I I I I " 

75 NEXTPRINT"»MI " 

90 PRINT")OM";TflB(4); ,, ia XBH" 

85 PRINT"**" :F0RT-8T09 

90 PRINT"«r;TABC4>;TNEXTT 

95 PR1NT"«B"; 

100 FORT-0TO9;PRINT")OW"TORX»0rO9:Y»9+C3*XrR-T*W;R»-STR*<R);RE*«RiaHT*<R*.2> 

IBS FORTP-lTO100;NEXTTP:pRINT"TMHBCV-LEN(RE«))iRE* 

110 POKEV+6,0;PuKEV+5,3i:POKEV+1.180;POKEV+4,33 FORTP-1TO50 NEXTTP^ POKEV+4, 

115 NEyTX.PRlNT'Tm"-FORTP-lTO300^HEXTrp; NEXTT 

120 FORTP-1TO730NEXTTP 

125 V-34272POXEV+6.0POKEV+5.12 POKEV+1.20 POKEV+4. 129 

130 FORI-1T015 WRIT33263.128UAIT53263.128.128 

135 P0KE3328 1 . I NEXT i FGRTP- 1 TO500 = NEXTTP I POKEV+4, 

140 FORTP-1TO1000;NEXTTP 

145 i : « CD- S»l Wl III 

150 flf<2)>"MM IMI IMI II IMI PI ■ 

155 '■*■'■■ s«**i IMI IMI II IMI H I 

160 R»<4)-"«WI MM II lil Uiiil 

165 !■*■: still Ml i»il II IMI II <l»tli I 

170 R*C6>-"»MI Mil llil II IMI HI 

175 hv ' ■-■ SiMl l»l IMI II IH •■ Win "Mi 

180 PRINT":T»".THBC32);"mi«aiiaiD1 ■'■:F0RI-lTu7:PRINTR»a>:NEXTl 

185 PRINTTRB<23); , 'JTOH«MFP.R J-CL MRRTEAU" 

190 FORTP-1TO3000 : NEXTTP i POKE198.0 CLR 

195 REM— ———— »--=—--— 

200 REM INSTRUCTIONS 

205 REM-«—=— —=——■■- _ 

210 POKE33280.5 PQKE532ei-2PRINT , ':jBr;TRB<8r:namBLES DE MULTIPLICATION!" 

215 PRINTTRB<e>,"ll«*«*****M«— **•*»****«'' 

220 PRINTCHRK14) 

225 PRINT ".TOW "ESIREZ-VOUS REVISER VOS TABLES'*" 

230 PRINT" MB 1tlL"'t VOUS PERMET HE VOUS ENTRA1NER" 

235 PRINT"B SUR Lfl TABLE DE VOTRE CHOIX PENDANT" 

240 PRINT-B 1 R 9 MINUTES RVEC DU SRNS L'AIHE" 

243 PRINT !, B D'UNE TRBLE DE MULT I PL I CRT I ON. ■ 

250 PRINT"BJB "NSUITE. UN TEST PERMETTRR EN" 

255 PRINT"* 20 ESSRIS DE CONTROLER VOS ACQUIS." 

260 PRINTTRB(20)J"IWBI*T"» • /. 1 IT,-! - " 

265 GETQ»:IFG*-""THEN263 

278 MM"" ■•■■■■■■■■■■■■ nmtmmmmmmm 

275 REM MQ3RUTES 

280 REM— =»»«—— «-— 

■,£53290 3 -_ ^_-:i81,2:pfiINT"n«r.TRB<;8>"MIABLES DE MULTIPLICATION!" 
&B KklHI IHH<U>;'JW«***********iti***»i******'' 
295 PRINT"MmBWm> tUELLE TRBLE VOULEZ-VQUS REVISER ? "J 
300 QETNA*:PRINT"S H II". IFNAt=""THEN300 

305 NR-VAL(NRf) IF(RSCCNR«)<49)0R<BSCCNH*)>57)THENPRINT"TTTm ,, iCOTO295 
310 PRINTNBS 

315 PRINT"B> -UREE DE Lfl REVISION EN MINUTES 5 
320 GETDUf PRINT"! Ml IT,; IFDU«"""THEN320 
325 DU-VRUDLW) 

330 PRINTDU* flSbA 

335 PRINT"M> "ESIREZ-VQUS L'fllEE D'UNE TRBLE ? '" 
340 GETTRf ; PRINT" I W II"; I IFTR«"""THEN340 
345 PRINTTR*IFTR»-"N"THENDT-rC0T0355 
350 IFTR«<>"0"THENPRINT"n"; 0OT0335 
355 FORT=lTOI000;NEXTT:pRINT M n ,, iCHRf<142)-TI*- 1 
360 RE M— ™=— — — « - 
365 REM PROG ENTRRINEMENT 

370 REM-— =■=——»— : 
375 POKE808.239 

380 CE"0:RE»0:DP-0 {{/[ 

385 IFVRLai*)>=DU*60THEN560 —Opo^> 

390 CE-CE+1 :SVf= SC-0 

395 NB-INT(RNDC1)»I9> + 1 

400 PRINT ":W,TAB(10);"BaWULTIPLICATION PRR";Nfl; , 'l 

405 PRINTTRBC9); " " 

410 PRINTTRBC13); "(ENTRRINEMENT)" 

415 PRINTTRB(4); I, «0|| 1" 

420 PR1NTTRBC4: 

425 PRINTTRBC4: 

430 PRINTTRBfS: 

435 IFDT-0THEN 

440 GQTO880 

445 REM=>=— ——«——— 

450 REM CONTROLE REPONSE 

455 REM=— =—====»=«=»===■— ■■- 

460 RP-NR#NB :NR=VRL(SYf> DR-1 

465 IFNRORPTHENDP-0 OOSUB730 FORT-1IG500 NEXM 

470 IFDR-0THEN485 

475 IFNR=RPTHENDR-1 RE*RE+1 GOSUF/BO 

460 FORT*lTO10e0;NEXTT:GOTO385 

485 PRINTTRBU1>;"B " PRINT ffl»>: II >- 

490 FORT-1TO1508^NEXTT 

495 IFDP=0THEN385 

500 IFEP=1THEN585 

505 ! 

510 i 



X";NBi" -"JTRBUS). 



T';NR." X",NB," 



;"T , .Nfl," 



' -"iTRBCig); 1 




515 RP-HMM NR-VrUXSV*) DR-i 

520 IFNRORPTHENDR=0 GDSUB780 : FORT-1 1 U150B : NEXT T 

525 IFDR-0THEN540 

530 IFNR=PPTHENDR=>l:RT-R7 + i:oaSUB7B8 

535 FORT=1TO1000 NEXTT G0T0583 

540 PRINTTRBai>,"» " : PRINTTRBai >. 

545 FQPT=1TO1500:NEXTT 

550 IFDP=0THEH385 

555 IFDP=1THEN585 

lf.f.0 fem= = = = =========== s!m »====== ! == 

565 REM PPC'CJRflMME TEST 

370 R EH ■iwamiiiiimnwri 

■^_, PRINTTRBOJ^-KWCMPFItJ V ENTPRINEMENT-DEBUT DU TEST , ^FORT=1TO3000:NEXTT 

580 TE-0 RT^>0 

585 DP=1 DT=1 SYS-"" SC=0 TE=TE*I 

?99 IFTEi20THEN725 

595 PERDNB PRINT "311" ;TftBU0>, "JUSTIULTIPLICRTION PRF:",NR-"1" 

60B PRIHTTABOJ; " " 

605 PRlNTTflBfa>.:"fTEST D E CQHTROLE H . "; TEJ "ID" 
610 PR1NTTABC4^; ' ' 
615 PRINTTRB<4> 

620 PRINTTRBC4), 

623 PRIHTTRB<3'."SKTfiPEZ Lfl REPnuSE" PRINTTRB(5). "PUIS ' 3RETURN1TH" 

630 GOTG880 

633 !» *■■■■■■■■■■■■■■■■■■■■ — ■■■■-■ 

640 PEil 3/S PROG^RFFICHRDE TRBLE 

645 REn== = -=— ='=-====■=»="-====== 

650 P0KE54296.15 : V=54272^ PRINT "jMPJMtC 

655 PRINTTAB<23>;"I I" 

660 P0KEV*6, = POKEV+5 . 12 ■ POKEV* 1 , 200 ■ POKEV+3. 40 

665 FORT-1TO10RT-NR»T 

670 POKEV+4, POKEV+4 , 65 FORTP= 1 TO50 ' NEXTTP 

675 PRINTTHB(23)J"I ";NR;" X ";TRB(33-LEN(STR*CT»);T; 

680 PRINTTHB(34)J" = ".TAB08-LEN<STR*(RT))>,RT."II I" 

685 PRINTTRB<23);"I I" 

690 PRINTTRB<23J;"L - I" 

695 PRINTTflB<23>," SO/ 

780 PRINTTRBi:23>," ■ ■ 

705 PRINTTRBCZS)." M 

710 PRIHTrilllir 

715 NEXTT P0KEV*4,B 

720 POKE78i.XX-i;POKE782.VY-rPOKE7B3.0:SVS65520' PRINT" 

725 REM=«-=-=— =—"=■— =-====== 

730 REH RESULTATS 

740 PRINT**ri1 l --TRB<:i0),"WriULTIPLICATlON PRR" ;Nfl. "1" 

743 PRINTTRBU4>."IKReSULTflTSr 

750 PRINTTRBO) ; "-K*******************-" 

735 PRINT"MOENTRAINEMENT " ;REJ TRB( 15) . "SUR" ; CE 

760 PRINTTflB<30;;"lr';iNTC<RE/CE)l|ll00);"Z)" 

765 PRINT-HBTEST -"jRTiTABClS) i "SUR 28" 

770 PRINTTRBC30) - "HC " : (RT/20)*100; "K>" 

775 POKE808-237-END 

780 REM-===— =—«===— ====== 

785 REM S/S PROG PORTE BRNDEROLLE 
790 PEf1=— =-=■===="=— - ="== =■' 

795 pri nt u mmsBBxmmstiSBiSSi-' 

800 FORX=1T03 C(X)=0:NEXTX 

805 PB*a>«" e i 1 o" 

810 IFDR=0THENPB«(2)-" 
815 IFDR-1THENPB*(2)-" 

320 PB»<3>-" *m I I I 

825 P0KE54296.15V=54272 

830 FORT-1T028FDRX-1T03 

835 POKEV+3; 32 : POKEV+4 . 1 POKEV+4* 33 

S40 POKEV+1,50 

843 POKEV+4, 

850 IFMIDS',PBf<X),LEN<PBf(X>)-T-C<X) + l-n»' 

855 IFMID*CPB*(X),LEN(PB*<X)>-T-C<X>+I,1)=' 

860 PRINT B ir. RIOHT*(PB«(X>,T+CCX>) 

865 NEXTX 

870 PRIHT'-TTTT'NEXTT 

875 POKE198.0; RETURN 

880 REM - 



:POKE198-0:RETURN 



PP0TEGEE»*# 



883 REM *»*SRISIE NUM. 

890 REM 

395 REM 

900 XX=^YY-17:SE=0 

995 POKE781.XX-lP0KE782.YV'l PGKE783.0 SYS65520^PRINT' ". 

910 P0KE781.XX-i:POKE7e2.VY-lP0KE783,8:SVS63529 

915 GETSXt : PRINT "1118 ■"/ F0RT-1T03 NEXTT 

920 PPIKT"II II". ■FORT=1T05'ME:-:TT IFSX*=""GGT0915 

925 IFtfiSC<SXf >«133)flNIi':flT=0) THENG0SUB635 SC*0 SY«*"" GOTO905 

930 IFRSC(SX*)-140THENSTGP 

9'it- ':-/=fiSC(SXf> 

940 IF(SX>47)RND(SX<:58)GOTO1000 

■>-■■'-■ yi:.!>i :•;.! .-..';, ;f ~.'_^: f'i.;.'-^-=4f-'i'it:ii:?>.i 

950 IFSX=28GGT0975 

935 IFSXO13GiJr0915 

96G SY=VflL<SV*> 

965 IFDP=0THEN445 

970 IFDP=1THEN505 

*?-■ SC=SC-l lF3C=eTHENSV»="" SE=0^GOTO985 

980 SY*=LEFT*(SV*.SC> 

9S5 PRINT"U II": GGTn^iS 

990 IFSC=1GOT0915 

995 00T0913 

1008 IFSC-200T091S 

1005 SE=1 

1010 SVS=SY*+CHR«<SX> PPINTCHFJISX); SC»SC+rGOT0913 

1015 DATR3, 2-0-5. 1-4, 7, 3. 9, 6. 4. 1,7, 2, 0.9. 8. 6. 3,5 
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PC = PETIT CHINOIS ! 



WANG, qui esl une boite 
ameticaine comme son nom 
ne iindique pas. wient de si- 
gner plusieurs contfats avec 
la Chine. D'abord la produc- 
tion de mim-ordinateurs 
Wang VS bas de gam me et 
leurs logiciels. ensuite la fa- 
brication de 50.000 unites du 
Wang 1107 Assistant avec 
togiciels en chmois et enfin 
I assemblage d? 30.000 ordi- 
nateurs de burBBtl Wang PC. 



Ces ttois centrals represen- 
ted la coquette somme de 
150 millions de dollars, soil 
150 milliards de centimes. Si 
IBM s'appelaii Hi Be Hem. 
aurait-il eu le contra! ? 




LASER : LA GUERRE DES ETOILES 



On sail qu Apple vient d'an- 
noncer limminenle sortie de 
son imprimante a Laser. Le 
cout de la machine en ques- 
tion tourne aux alenlours de 
70.000 francs. C'est pas 
donne, mais y parait que 
c'est bien. que c'est beau, 
qu'on fait pas mieux. Alors si 
on fait pas mieux, c'est pas 
la peine, parce que moi j'ai 
pas ete emballe par la net- 
lete du document lasenlie 
que le service de presse 



d'Apple difluse a tire-larigo. 
Tout ce que je peux dire, 
c'esl que des imprimantes a 
laser professionnelles on en 
trouve su' le marche a partir 
de 39.000 frs. Et qui mar- 
chent bien. 



■***L'0* 




LA GRF.NOLILLE SE MOUILLF. 



Froggy Software vient de pu- 
blier un programme utilitaire 
qui permet (enfin) d'adapter 
les dessins Dazzle-Draw ou 
Beagle-Graphics au procede 
Secam frangais. En d'autres 
lermes, tous les lettrages en 
double haute resolution de- 
viennent parfaitement lisibles 
grace a ADAPT, lis son! lor- 
midables che2 Froggy, nest- 
ce pas ? Oui, je croooaa ... 
(ADAPT, dilfuse par SOFT- 
MART) 
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Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Depuis plusieurs semames. 
vous profirez dun cours das- 
sembleuf decompose en deux 
parties principales (1'une theo- 
rique, I'autre pratique) 

Cette semame. le cours prati- 
que concerne une nouvelle 
fols le 6510 du Commodore 
64. Le procham numsro 
consacrera une pleine atten- 
tion aux angoisses majeures 
duZSOduZJfSI 
Jusqu a present, les cours pra- 
tiques suivant onl ete publies: 



1*55 — ZX81 

1*56 — ZX81 

1*57 — ORIC 1. ATMOS 

I" 58 — APPLE 

I* 59 — T07. T07 70 

I* 60 — COMMODORE 64 

r 61 — ZX 81 

!• 62 — ORIC 1, ATMOS 

I* 63 - APPLE 

I* 64 — TO 7, T07 70 

1*65 — COMMODORE 64 

I* 66 — ZX 81 

1*67- ORIC 1, ATMOS 

I* 68 — APPLE 

I" 69 — T07. T07 70 




Rsgardez maintenant le schema 
electronique partiei du decoder 
qui genere la table de verite a- 
Oessus. Vous remarquerez l'im- 
portance jouee par I'entree s 
dans la determination el le de- 
crypt age du code. 
T DECODEUR (vue partielle) 




n .ntr*M 
S ' 


1 I n Sorties 





Ces deux circuits (encoder el 
decodeur) permettenl done le 
codage ou le decodage d'infor- 
malkins en provenance ou a 
destination de lexterieur (peri- 
pheriques du type ecran, clavier, 
imprimante . )- 

Nous allons maintenant dinger 
notre etude vers un nouveau cir- 
cuit: le multiplexer. Ce mon- 
tage per me; d aiguille r une voie 
parrni N. II est done destine a 
dispatcher [dans le temps) les 
informations quil possede en 
entrees vers ('unique sortie. 
Pour ce faire. on lui fournil un 
code qui designera le numero 
de la voie a "muftipiexer". Pour 
mieux vous representer ce sys- 
teme (et avant den regarder le 
schema) imaginez une autoroute 
a hurl voies. Au bout de eha- 
cune des voies se trouve un leu 
rouge. Le multiplexer fera pas- 
ser a Iter native menl au vert I'un 
ou I'autre de ces huit teux de si- 
gnalisation. mais a aucun mo- 
ment deux feux ne pourront etre 
verts simultanement. Ci-dessous 
vous trouverez la table de verite 
et le schema d'un multiplexer a 
deux voies. 
MULTIPLEXEUR DEUX VOIES 



Le multiplexer laisse passer la 
voie choisie V1 ou V2. quand ii 
est actif, grace au numero de 
voie C que Ion affiche C'esl ce 
que vous constalerez a la lec- 
ture de la table de verite. 
T TABLE DE VERITE 



Les mullipJexeurs exi slants ac- 
luellement disposent de deux, 
quatre. huit ou seize entrees. Le 
nombre des entrees est en rela- 
tion direcle avec le nombre de 
'ils a amener pour eflectuer la 
selection de voie Par exempie 
si vousvoulez un multiplexer a 
seize enirees. il vous faudra 
quatre flls pour selectionner 
I'une des seize voies: le code de 
selection est binaire, avec qua- 
Ire tils nous pouvons gGnerer 2 i 
4 codes (soit 16). Comma pre- 
cede m men I nous ne represente- 
rons plus les multiplexers au- 
Irement que sous la lorme d'une 
brique informatique. Voici cells 
correspondant a un multiplexer 
a seize entrees. 



Sa table de verite est: 
T TABLE DE VERITE DE V 



La encore, les sorties sonl acti- 
ves a i etai zero. Noubliez pas 
cet element de notation: S (en- 
tree ou sortie active a fetal 1) 
ou s (entree ou sortie active a 
lelat 0). Dans le cas du deco- 
deur, c est lorsque s = qu'un 
code va etre traite par le circuit. 
Oorenavant. nous utiliserons la 
representation en bnque pour 
schematise' les decoders 

T BRIQUE DECODEUR 



5««li0Bd»( — 
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Le multiplexeur n'a pas comme 
seule utilite la selection de 
voies: il peut aussi servir a la re- 
connaissance d'une valour. 
Nous allons. pour illustrer cette 
possibility, nous baser sur un 
multiplexeur a huit voies. Suppo- 
sons que nous voulions recon- 
naitre la voie 3. II surlit de 
connecler toutes les enirees a la 
masse (0 volt) sauf la voie 3 qui 
sera branchee en 5 volls. 



ii. 


ii. 
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Au niveau des (ils de selection 
rant que ton envena un code 
different de Oil , on obtiendra en 
sortie V = 0. En revanche des 
que le code 011 sera affiche a 
I'enlree. on obtiendra V = 1. 

D'une optique plus gsnsrala. on 
peut schematiser la majorite des 
ton ct ions logiques complexes 
grace a un multiplexeur. Ce mi- 
racle est rendu possible par le 
fait que toule fo net ion logique ne 
peut generer que deux rspon- 
ses: soit vrai soft faux. II suffira 
de calculer toutes ies valeurs 
que pourra prendre la fonction 
en dressant sa table de vsnte. 

Pour chacune des variables 

donnanl comme results! Faux, 
on cablera la voie correspon- 
danle a la masse a tors que pour 
toutes celles donnam Vrai. on 
tes reliera au 5 Volts. La meil- 
leure lacon de comprendre ce 
pnncipe est de lillustrer par un 
exempie. Prenons la fonction. 



a b c v 
O 
11 1 
10 1 2 
110 3 
10 4 
10 10 5 
1)016 
11117 



Le multiplexeur correspondent i 
la fonction V sera done cable dr. 
ta (aeon suivante: 




II est a souligner que le systems 
du multiplexeur ne doit 6tre uti- 
lise qu'a bon escient et que lin- 
lormation multiplexer ne doit 
pas avoir de sens pour la togi- 

aue pendant un certain intervalle 
e temps At. Le schema ci-des- 
sous exprime de maniere tern- 
pore'le le fonctionnement du 
multiplexeur. 



^ 



Ce genre de representation gra- 
ph ique faisant reference au 
temps sont regioupees sous le 
nom generique de "chronogram- 
mes". Leur ulilisation permet de 
mieux comprendre le fonctionne- 
ment des circuits sequentieis 
auxqueis nous allons attacher 
prochainement notre attention 
Ils permettent aussi la mise au 
point de la synchronisation de 
lensemble des circuits d'un ordi- 
nateur. Nous aurons a nous en 
resservir dans la suite du cours. 
Maintenant que nous avons vu 
les circuits essentieis en logique 
combinatoire, nous allons pou- 
voir nous pencher sur I'un des 
circuits que contient obligatoire- 
menl votre micro-ordmateur. 
comme votre calculette d'ail- 
leurs. Nous allons gaillardement 
nous pencher sur I Unite Logi- 
que el Aritnmetique (ou ULA 
pour les connaissers el ALU 
pour les francophobes anglo- 
phones). 



L'ASSEMBLEUR PRATIQUE 

Langage machine... sur com 64 




Dsja le Iroisieme cours, vous 
vous eles reveille ce vendredi 
15 fsvrier 1985. ca y est, le 
journal est sorti. Apres avoir 
Du precipitamment votre cafe, 
ce ful la course jusqu'au kios- 
que le plus proche. Joie. bon- 
heur, c'esl I'extase, vous par- 
courez rapidement I'hebdo a la 
recherche de ce cours tant at- 
lendu. Page pedagogique... 
Vous I'avez trouvee et vous 
commencez a vous rememorer 
les precedents cours. 

Nous parlerons aujourd'hul 
des registres de ce cher 6510 
adore (le processeur bien sur) 
Ne fuyez pas. vous avez deja 
travaille sur un registre sans le 
savoir (n* 65). en voici la lisle: 

- I'accumulateur (A). C'est le 
plus important, vous pouvez 
tout lui faire (ou presque, res- 
tons dans I'informatlque s'il 
vous plait), copier, modifier, 
additionner ou souslraire, 
comparer, etc... 

- les registres d'index X el V. 
Ces deux registres Ires utiles 
permeltenl des translerts de 
donnees avec I'accumulateur 
el surtout I'adressage indexe 
de A. Ou'est-ce que ladres- 
sayu index*? Vous o.ct oiiro 
merit temarqu6 dans le prece- 
dent cours que les instructions 
LDA et STA agissaient suf une 
adresse de la memoirs don- 
nee. Par exempie: LDA $ 7000 
net dans A la valeur contenue 
dans l "octet d'adresse 7000 
(c'esl une valeur hexadeci- 
male). Grace aux registres X 
et Y nous pouvons prendre 
une valeur a ladresse 7000 * 
X (ou 7000 + Y). Pour ce 
(aire, il faut mettre une valeur 
dans X par 1'instructton LDX 
Reprenons lexemple prece- 
dent: 



Cette 'ois, nous chargerons 
I'accumulateur avec la valeur 
contenue dans loctet 

d'adresse 7000 + X, c'esl a 
dire 7000 + FF = 70FF. Elon- 
nanl non? 

- le registre d'etats R (Slack 
Register), regislre de huit bits 
donl chacun correspond a une 
indication precise (a une ex- 
ception pres). Chacun de ces 
bits esl appele INOICATEUR 
ou DRAPEAU. En voici le de- 
tail: 



bit 0: 
bit Ii 

bit 2: 
bit 3: 
bit 4: 
bit 5 

Hon] 

bit 6 



C. carry ou retenue 
2. zero 

I. masque d'interruptions 

D. mode decimal 
B. break 

utilise (voila 1'excep- 

: V. overflow ou deborde- 

! 

: N. resullat negatlf 



Ne vous affolez pas. nous trai- 
lerons du role de ces indica- 
tors par la suite. Mais pour le 
moment il suftit que vous sa- 
chiez que certaines des ins- 
tructions dispombles sur le 
6510 onl comme domaine 
c application speciflque ces 
drapeaux. Par exempie: CLC 
(met le drapeau C a 0), SED 
(mel le processeur en mode 
de calcul decimal)... 
- le compteur ordinal PC (pro- 
gram counter). Ce registre de 
16 bits (le C64 dispose d'une 



memoire de 64 Ko son 65.536 
octets et 65 536 = 256 x 256 

= 2 octets) contient en perma- 
nence ladresse de la pro- 
chalne instruction a executer 

- le pointer de pile SP (Slack 
Pointer). Non non, voire ordi- 
nateur ne fonctionne pas avec 
des piles ou des batteries, il 
est branche sur le secleur 
(tout comme nous). II s'agi! en 
fait d'une pile de donnees Si 
vous avez deja utilise une* cal- 
culette a notation polonaise in- 
verse, la notion de pile ne doit 
pas vous etre etrangere. 
Grace a des instructions spe- 
eifiques vous pouvez EMPl- 
LER ou DEPILER des don- 
nees. Comme dans une pile 
d'assietles vous ne pouvez 
que poser une assietle en haul 
de la pile ou retirer celle qui se 
trouve en haut. SP contient 
ladresse de la dermere as- 
sietle posee + t. C'est done 
I'adresse de la prochaine as- 
sietle a etre posee dans la 
pile. Dans la memoire du C64. 
la pile se trouve de ladresse 
0100 a l adresse 01FF. 

- un dernier regislre, qui 
n'exlsle pas sur le 6502 (pro- 
cesseur dont est issu le 6510), 
s'occupe du port d'entree-sor- 
tle du processeur. II se trouve 
a I'adresse 0000 et sappelle 
registre de direction, son role 
est de renseigner le 6510 sur 
la direction a donner aux bits 
conlenus dans le regislre den- 
trees sorties situe I I'adresse 
0001. 

Je reprends mon souffle, relis 
ce paragraphe et continue 
mon delire: ces bits (vus plus 
haul) eommuient certaines 
parties de la memoirs, en 
ROM ou en RAM. et donnent 
des renseignements sur le lec- 
leur de cassettes (touches en- 
loncees par exempie). Pour 
vous donner une dee de I'hu- 
mour de la chose, tapez en di- 
rect I'instruction suivante: 
POKE 1.0. Que s'est-il passe? 
Vous avez tout simplement 
bascule ('ensemble de votre 
memoire en RAM. Vous dlspo- 
sez maintenant de 64 Ko de 
RAM utilisateur. mais vous de- 
vrez tout reecrire (gestion sys- 
teme, peripheriques...). Une 
gageure vu que vous ne pou- 
vez plus Hen faire, a pari 
leteindre. Le registre de direc- 
tion indique done au proces- 
seur si les bits sont destines a 
etre emis vers les circuits inte- 
gres ou a etre recu par ce 
meme processeur. 
Lorsque vous utilisez un logi- 
clel d'assemblage vous avez 
une commande (R en general) 
qui vous permet de visualiser 
le contenu des principaux re- 
gistres (PC. SP. A, X, Y et R) 
sous une forme equivalents i 
celle-ci: 

PC SR AC XR YR SP 
8000 50 00 FF 07 FF 
Nous allons maintenant appli- 
quer ce que vous venez d'ap- 
prsndrs. 

Malheureusement. un pro- 
gramme ne tourne pas qu avec 
des registres. c'est pourquoi je 
vais vous expliqusr succinte- 
ment trois nouvelles instruc- 
tions (dont js vous sxposerai 
les details dans un cours a 
venir). 

La premiere est relalivemenl 
simple (tout est relatif). il s'agit 
de INX (en anglais: Increment 
X) ou incrsment de X. Lorsque 
le processeur rencontre cette 
instruction, il effsclue I'opera- 
tion:X = X + 1. 
Linstruction CPX indiqus au 
6510 quil doit pratiquer una 
comparaison (pas contre na- 
ture) entre la valeur contenue 
dans X et celle aui suil imme- 
dialement I'instruction. Regar- 
dez cet exempie. ca vous pa- 
raltra evident: CPX § $ 05 
compare le contenu de X avec 



05. Le resultat est pris en 
compte par trois des drapeaux 
du registre d'etats R (Z, N. C). 
Enfin la Surprise. |e ne peux 
rien vous dire actueHement, 
sinon quelle sappelle BNE. 
quelle utilise le registre R 
pour eflectuer I'equivalent dun 
GOTO et quelle est tres 
complexe. Lorsque Ton utilise 
CPX suivi de BNE. on obtient 
un resultat proche de I'instruc- 
tion basic suivante: 

IPX < > 5 THEN GOTO N 

BNE stgnifie (c'esl pour votre 
culture) Branch it Not Equal to 
zero, ce qui en bon franssoue 
de cheu nous veut dire; eflec- 
tuer un saut a la ligne mdiquee 
si le resultat est egal a zero 
Vous allez maintenant (vrai- 
menii utiliser ces instructions 
en tapant le programme qui 
suit. Que ceux qui ne dispo- 
sent pas dun logiciel d'assem- 
blage utilisent le listing basic. 

LISTING ASSEMBLEUR 
3000 RS< 4© LDA «•■•■■. 

S002 f\2 00 LDM MM 

JUL..1 ■-[. -;..-i [,:; :'m (IiftiJO 

300? 9P 00 04 STfi JO400.X 

300B ?U F0 Iij SIR (D8F0.X 

300D 3D F0 64 STfl IO4F0./: 

3010 9D E0 1)3 STR (D9E0.X 

3013 9D EO 05 STfl *05E0..X 

3016 3D DO Dfi STR JDRD0.X 

3019 9D D0 06 STR *0SB0.K 

30 1C E8 INX 

361D Ek) Fw CPX **F0 

301F DO E3 BNE f.iyCM 

3021 00 BMC 

LISTING BASIC 

10 F0ftF=12288TCi 12321 ftEftDft 

2e TP6=5ias?fliHSYSiaa«'bNjj 

39 PFlHT-lDIOTI.ERfteuft DE 
DHTfl ■ ! ■ 

40 DrVmi69, 64. 162.0. 157. S- 
216.157.0.4. 137. 2*9. 216. 
157,240,4.157.224.217.157 

50 DflTft224, 5. 157,208,218. 157. 
£08.6,232,224.248,288.22?, 
96 

Si vous avez tape le deuxieme 
listing, vous n'avez qu a faire 
un RUN. Pour ceux qui ont 
rentre le listing assembler, 
lancez votre programme par 
un G 3000 

SURPRISE! Que se passe-t-H? 
Voici une explication ligne a 
ligne de la chose: 

- LDA # S 40 charge A avec la 
valeur decimale 64 (soit 40 en 
hexa) 

- LDX # $ 00 charge X avec la 
valeur (decimale ou hexa. . ) 

• STA $ D800, X met dans la 
memoire couleur de votre 
ecran le code de la couleur 
noire 

- STA $ 0400, X met dans la 
memoire d'ecran le code du 
caractere '-" 

- INX increments le contenu 
du registre X de 1 

- CPX et BNE S 3004 servent 
a tester si le contenu de X esl 
egal a 240 (en decimal). Tant 
que X est different de cette va- 
leur, le processeur retourne a 
la ligne 3004 pour continuer 
■'execution du programme. 

D'autre part, le test s'eftectue 
sur la valeur 240 car le pro- 
gramme atfiche le caractere *-" 
sur six hgnes (chaque ligne 
comptant 40 caracteres) ce qui 
nous donne done: 6 x 40 = 
240. 

Pour vous psnstrsr ds la pro- 
londe signification philosophl- 
que des adresses ullllsees^ 
dans ce programme (DSOO, 
0400,..) repoitez-vous a votre 
manuel de lutiiisateur. chapi- 
trs "msmoirs d'ecran el me- 
moirs couleur". 

Comme js suis sOr qus vous 
patinez dans la semoule la 
plus glissante, je vous laisse 
jusqu a la prochaine fois pour 
digerercequi precede. 

Sebastien MOUGEY 
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SOFT-PARADE 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 

Nous avons selectionne pour vous les meilleurs logiciels actuellement disponibles en France. Nous ne 
pretendons pas que cette liste est complete et definitive et //est evident que nousyrajouterons regulie- 
rement des programmes. Pourtant, vous chercherez en vain certains programmes quijouissent d'une 
bonne reputation et qui se vendent surtout grace a la publicite et aux conseils des vendeurs qui ne peu- 
vent pas connaitre tous les logiciels disponibles. 

Les prix sont, nous I'esperons, les meilleurs du marche et les abounds - anciens ou nouveaux - benefi- 
cient en plus d'une remise de 10 %. Si vous etes nombreux a nous suivre dans cette experience nous 
pourrons rapidement arriver a faire baisser les tarifs des tournisseurspouratteindre t'objectifque nous 
nous sommes fixe: ramener les prix a une plus juste valeur I 

Les classements sont t aits en fonction de I'interet du programme et ne tiennent pas compte des prix, 
c'est a vous dejuger de I'opportunite de la depense. N'oubliez quand meme pas que si le rapport quali- 
te/prix est mauvais, le logiciel ne peut figurer dans cette page ! 




SI vous etHs ABONNE, 
deduisez VOUS-MEMES 
vos 10 % de REMISE 
Bur Is bon de commande. 




nouveau . 



R CHAMPIONSHIP. 



RADAR RAT RACE 



BACKGAMMON 
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SCUBA DCVE 
































ULTIMA ZONE 






L'AIGLE O'OR 








Super-ge-ial-i 




























ji ombuche 


lAldnH 


GiSTBONflH 


MISTER ROBOT AND HIS ROBOT FACTORY 
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REVENGE OF THE MUTANTS CAMELS 
HOVER BOWER 
ZENJI 
KILLER WATT 

SIMULATEURS DE VOL AND C ,: 




SEVEN CITIES OF GOLD 
TALES OF THE ARABIAN NIGHTS 

DALLAS 

CHINESE JUGGLER 

BOZO'S NIGHT OUT 

PULSARII 
ELIMINATOR 

EVOLUTION 

en pisianl par les dHHWUH "Hapes lie r 
SUMMER GAMES 



MASK OF THE SUN 



IE-ON-ONE (D: J I Lorry Bird) 



PIN BALL CONSTRUCTION 



§HK£ 


ggsgisss 


.Rians.ueca.d4a, 


RABBrTRAIL 


ulmonla lalmel 
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NECROMANCER 



CHOCS DES MULTWATIONMES at MANAQER 



DEFENSE FORCE 



LOGICIELS 
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A.E .1 ZAXXON 
MICRO SURGEON 



GHOSTBUSTERS 



LE VOYAGEUR OU TEMPS 



__PLANETES 

Si la beauts du ciel nocturne vous arrache & la 
contemplation de votre nombril, ce programme ris- 
que fort de vous interesser. 

Olivier JAMMES 

Mode d'emploi: 

Le mode d'emploi est dans le programme. Son objet est de de- 
terminer et de visualise? les positions des planetes et de ta Lune 
sur leurs orbites et dans le ciel, n'importe quel jour entre 1 985 et 
2050. 

Apres la page de presentation et la page "Choix de la date , on 
voit se dessiner les orbites des planetes proches du Soleil, ainsi 
que leur position respective. On notera que la dimension de 
I'orbite de la Lune est tres exageree. ceci pour permettre un re- 



Thomson T07,T07/70,M05 



parage plus precis. Par pression sur la barre d'espace, on voit 
apparaftre les orbites et les positions des planetes lointaines et 
de laTerre. 

La derniere page est une carte du ciel zodiacal ou les principa- 
les constellations sont tres reconnaissables. Les etoiles du mi- 
lieu de la carte passent au meridien a minuit. Sur cette carte se 
dessine I'ecliptique qui traverse les constellations du zodiaque. 
Viennent ensuite les planetes a leurs places pour le jour de- 
mande, ainsi que la Lune avec sa phase. Les planetes trop pro- 
ches du Soleil disparaissent ensuite dans les hachures de la lu- 
miere solaire. 

Pour une execution plus rapide du programme, on peut faire 
I'impasse a la page "choix de la date" sur les orbites, I'ecliptique 
et les hachures crepusculaires. 




■ . ■■.■■ ■■■■::■■..■.■■■.■■■■■■■■;■....■ 

HON DES PLANETES **»* 



108 CLS:G0SUB 2738' PRESENTATION 

li0 CLS:SCREEN2,6,0:CLEAR,,2 

126 ATTRB1,1:L0CATE3,3:PR1NT"CHDIX DE LA 

DATE" 
136 ATTRB0.0: LOCATES, 6: INPUT"ONNEE Ids 1 
935 a 2050>";AN 

[45 LGCATE14,8:INPUT"M0IS <de 1 a 1£>";M 
158 LOCATE26,10:INPUT"JOUR"s;J 
160 PRINTiPRINT" TRACE DES ORBITES" 
178 INPUT" ET OE L'ECLIPTIOUE (0/l> 



HACHURES SUR LES Z 953 



CREPUSCULAIRES 



E10 8=640-70-K326*<J + ' 



. >*38.< 



-■365. 



.?.-f! HCS="MERCUftE":VS = "VENUS"JT*="Lft TERR 

E":LS="LA LUME":H*="HaRS":J*= H JUPITER" !S 

*="SATURNE" 

£33 SCREEN2,0,0;CLS 

240 'PLANETES TELLURISUES (ORBITES' 

£50 DEFGRJ<0>=60, 126.255, £55, H55, £55, 126 

,6B 

260 DEFGR*<l>=0,8j0* 6, IE, 12,0,0 

£70 LOCATE 20, t2,8:C0LDR3:PRIHTGR*i:e^ 

2B0 C8=162:L8=105:R=24.16:ST=.3!CD=5 

290 GOSUB 380 

300 LOCATE0,0!COLOR5:PRINTNE* 

310 C0=164:L0=108iR=45:ST=.25:CO=3 

326 GOSUB 380 

330 LOCATES, 1:C0LQR3:PRINTV* 

340 C8=164!L0=18i:R=62.33:ST=.17:CD=6 

350 GOSUB 388 

360 LOCATES, 2:C0L0R6:PRINTT* 

370 C6=158:L8=95:R=95:ST=.ll:C0=l 

389 IF 0=0 THEN 450 

390 'ORBITES 

400 FOR T=0 TO 2*3.1416 STEP ST 
418 C^CO+RSCOSCT} 
420 L=L8-R«SIN<T) 
436 PSET<C,L),C0 
448 NEXT T 



t IF V<1 THEN 780 

5 LINE"f.U-l,V-l}-(U+l,V-l),5 

! IF H=t THEN 2290 

J 'POSITION DE LA LUNE 

J N=<365*A)+<38.44*<t1-l>)+J-l*B 

1 Rl=N HOD £7.3217 

1 :L=CT1*15*C0S(2«3. 1416»RL-'27.322i 

! LL=LTl-15*SIN(£*3.1416*RL/27.322' 

) J=CL:v=LL!IF U<3 THEN U=3 

J LINE<U-1,V)-(U+1,V>,3 

1 LINE<U,V-i>-(U,V4-l),7 

) UU=U:VV=V 

i IF W = l THEN GOSUB 168B:G0TQ 2310 

J L0CATE9,4:COL0R7:PRINTLS 

j 'POSITION DE VENUS 

- M =. i65: ; (4-. + f36.44*i:M-i:w+j-t+g7.74 

. PV = N HOD 224.7 

, CV=164+45*C0S<:2*3.l4t6*RV/224.7> 
i LV=109-45lliSINt2l|i3.14l6*RV/£24.7> 
' U=CV:V=LV 

IF U<2 THEN U=£ 
L £ NE '.' tl- 1 , V -2 ) - \ U + 1 ■ V -2 / , 3 
LIME>ij-£,y-r--fU+2.V-l>,7 
I.IWL. u-2.V'-nj*-2,V),3 
1 LINEfU-2,V+l>-i:U+2,V+l>,7 
< LINE(U-l,V + e>---.U + l..V+2:',3 
1 IF 14=1 THEN 2270 
1 'POSITION DE MERCURE 
■ K=C365*fl>+<3e.44*iM-lJ>+J-l+43 
I PHE=N MOD 87.37 
• CHE=15£*24. 16*C0S<2»3. 1416SRME/87. 9 



1676 LI1E = 105-£4. 16*SIN<2*3. 1416*RPIE -S7.9 



$!GOT0 49B 

460 IF C0=£ THEN L0CATE8, 2: COL0R2: PRINTS 

CGOTO 1278 

470 IF C0=7 THEN LOCATE0, 4:C0L0R7: PRINTL 

*:G0TO 678 

480 RETURN 

490 COLOREsLDCATE 28,B,8:PRINT J 

560 LOCATE 31,0, = PRINTH 

510 LOCATE 34,0,0:PRINTAN 

S20 IF CD=2 THEN RETURN 

530 'POSITION DE LA TERRE 1 

548 N=<;365*A> + (30.44*<H-imj-l*131.5 

550 RT=N MOD 365.26 

566 CTi=164+62.33«COS<2*3.14*RT/365.£6> 

570 LT1=101-62.33*SIN<2*3.14*RT^365.£6> 

586 U=CT1=V=LT1 

590 LINE<U-l,V-2>-<U+l,V-2>,7 

686 LIHE<U-2,V-l>-<U*2,V-!>,6 

610 LINE(U-2,V>-<U+2,V>,6 

620 LINE<U-2,Vt-l)-<U+2,V+l),6 

630 LINE(U-I,Vt2) J <U*i,V+2),7 

640 IFO=0 THEN 670 

650 CB=CT1:L0=LT1!R=15:ST=,52:CO=7 

660 GOTO 400 

670 'POSITION DE MARS 

688 N='365»A)*(38.44«<N-1)>+J-1*19.08 

690 R«=N MOD 687 

708 CM=158+95»C0S<2»3. 1416*RHy687> 

716 LN=95-95*SIN<2*3. 1416*RNy687> 

728 U=CM:V=LM 

736 IF U<1 THEN U-l 

?46 LINE<U-1,V>-<U+1,V>,1 

750 LINE(U-l,VtI>-<UtI,V+l),5 



+ HECTOR 

Suite de la page 4 



1590 IFHK=1ANDWW=ITHENWW=2: MK-0 
1600 IFHK=lANDWW=2THENWW=l:HK-0 
1610 IFHJ=1THENM=6 

IFM=6THENB*= , '123456'-:f1=0:HJ=O 
1670 &O5UB310:G0StJB770 
1640 F0RI=iT06 
650 D< I>=0: C( I)=O:B=O:C=0:X=O: Z=0: R<I ) • 
660 IFSCU) -9999THENPRINT"&R0V0 " i NM* ( : 

6AGNE":GOSUB33T.0iGOTO72BCi 
670 IFSCI2) >9999THENPRIWT" BRAVO" ; NM* 1 1 
GOGNE": TONE 110, 500: GGT03290 
16B0 NEXTI:C*=" , ':GOT0B2O 

' AFFICHAGE DU SCORE**I*»*I 
0UTPUTNM*<1) .25,220, 7-:0UTP!JTNM4 (21 , 
1710 RETURN 

***»DESSIN DES DES**I 

1740 LINETO.200,60,200, 1 

L1N63©,20Q, 30, 150. 1 

1760 LINE30, 150.60, 150, 1 
1770 LINE60, 150,60,200. I 

LINE100.2O0. 170.200. 1 

1790 LIME 100, 200, 100, 150. I 



1090 IF IK1 THEN I 



I LfNE<U-l,V+I>-(U+l.V + l),3 

I IF H=l THEN 2250 

I IF I«KEVtOCHR*(32) THEN II- 

1 > 

I 'TERRE ET PLANETES GEANTES 

I CLS 

I LOCATE 20,: 

I C6=164!L8=1 

I GOSUB 388 

1 LOCATES, 0!COLQR6!PRIMTT$ 

1 C6=162:L0=181!R=51.6:ST=. 15=00=3 

> GOSUB 38B 

1 LOCATE0,l:COLOR3:PRINTJ* 

I C8=162:L0=185:R=95:ST=.ll:CO=£ 

> COQUB 398 

1 'POSITION DE LA TERRE 2 

t N*C365»A)+C30.44«CH-1>>+J-1 +181.5 

1 RT=N NOD 365. £6 

U64+9.94*C0S(2*3.14*RT-'365.26> 
M8e-9.94*SIN(2*3.14*RT/365.26> 



1320 U=CT2:( 



1336 


LINECU-I,V)-(U4-1,V),7 






1348 


LINECU, V-1)-<U, V+l!,6 






1358 


'POSITION DE JUPITER 








N=<365»A) + <38.44*<I1-1> 


+J-: 


+3532 


1378 


RT=N MOD 4333 






1388 


C J= 162+51. 6*C0S<£*3. 14 


■SSR- 


-•4333 


1398 


LJ=18I-51.6*SIN<2«3.14 


t-r-P" 


•4333 


1488 


U=CJ!V=LJ 






1418 


IF U<£ THEN U=2 






1420 


LINE(U-l,V-2)-<U+-l,V-2 


r5 




1438 


LINE<U-E,V-l>-c:m-2,V~l 


.3 




1448 


LINE(U-2,V)-(U+2,V),5 






1458 


LINECU-£,V+1)-(U+2,V-1 


»3 




1468 


FSETCU4-1,V+1>, 1 






1478 


LINECU-l,V+2)-<U+l,y+i2 


*5 




1488 


IF 14=1 THEN 233B 






1498 


'POSITION DE SATURNE 






1588 


N=C365«A>+C30.44*CM-1 ) 






1518 








1520 


CS=162*95*C0S<2«3. 1416*RT/1 


(768) 


1538 


LS=105-95*SINC£*3.1416*RTV1 


9768) 


1548 


U=CS:V=LS 






1558 


IF U<6 THEN U=6 






1568 


LINECU-l,V-2)-'U+l,V-2 






1578 


LINECU-2,V-lJ-tU+2,W-l 






1580 


LINECU-3,V)-(U+3,V),5 






1598 


LINECU-E,V*I)-<U+2,V'H 


,1 




1688 


LINECU-6,VJ-CU-4,VJ,3 







1618 LINE(U+4,V)-<:U«-6,V>,3 

1628 LI»E(U-l,V+2>-(U+l,V+2),3 

1636 IF H=l THEN 2528 

1648 GOSUB 498 

1658 IF INKEYtO CHR*(32) THEN 1650 

1668 ' 

1678 GOTO £358 

1686 'PHASES DE LA LUNE 

1698 IF UU<7 OR UU>313 THEN RETURN 

1780 CO=COS<3.1416*UU^160) 

1710 IF UU>16B THEN 1860 

1728 LINECUU-2,VV-6>-lUU-(3*C0),VV-6J,7 

1736 LINE(UU-4,VV-5)-i:UU-(:5*C0!,VV-5),3 

1748 LINE(UU-5,VV-4)-CUU-i:6»C0),VV-4>,7 

1758 LINE(UU-5,VV-3>-(UU-C6»C0),VV-3),3 

1768 LINE<UU-6,VV-2>-(UU-<:7»C0>,VV-2),7 

1770 LINE(UU-6,VV-l>-<UU-(7«C0),VV-O,3 

1730 LINE(UU-6,VV-0>-CUU-(7*CO),VV-0),7 

1790 LINE(UU-6,VV-H)-(UU-<7*C0),VV + 1>,3 

1880 LINE(UU~6,VV+2>-(UU-C7»C0),VV+2),7 

1810 LINE<UU-5,VV+3>-lUU-(&»C0>,VV+3>,3 

1820 LINECUU-5,VV+4)-(UU-(6*C0),VV+4),7 

1838 LINECUU-4,VV+5>-CUU-<5»C0)iVV+5),3 

1840 LINECUU-2,VV+6>-CUU-C3*C0J,VV*61,7 

1850 IF UU<=168 THEN RETURN 

1860 LINE(UU+2,VV-6)-(UU+C3*C0),VV-6),7 



1B98 LINE<UU+5,VV-3>-tUU+<6»C0>,VV-3?,3 

1900 LINE(UU+6,VV-2>-CUU+<7«C0),VV-2i,7 

1910 LINE(UU+6,VV-l>-fUU+<7»C0),VV-l>,3 

1920 LINE(UU+6,Vy-B>-(UU+<7*CO),VV-0>,7 

1930 LINE(UU+6,VV*-1)-CUU+<7*C0J,VV+1?,3 

1940 LINE<UU+6,VVt2>-CUU+<7*C0!,VV+2),7 

1950 LINE(UU+5,VV*3J-c;uU+<6*C0;,VV+3 3,3 

1960 LINE <UU+5,VV+4>-fUU+<6»C0>,VV+4 ),7 

1970 LINE<UU+4,VV+5<-c:UU + <5«Ca>,VV+5>,3 

1988 LINE(UU+2,VV+6)-fUU+!3«C0),VVt6),7 

1998 RETURN 

2060 'POSITION DES PLANETES SUR LA CARTE 

£610 C=CME:L=LHEiCT=CTl:LT=LTl:U=i 

£020 GOTO 213B 

2838 C=CV:L=LV 

2648 GOTO 2130 

2850 C=CM:L=LM 

2068 GOTO 2138 

2079 C=CL:L=LL 

2086 GOTO 2138 

2098 C=CJiL=LJ:CT=CT2lLT=LT2 

2160 GOTO 2139 

2118 C=CS:L=LS 

2120 'RECHERCHE DE LA POSITION 

2138 D=S0H((V-lTj"£'",i--i.t>-2J 

£140 IF L<=LT THEN 2188 

£150 FOR X=8 TO 3.1416 STEP .05 

2160 IF COSfKX<C-CT>'D THEN 2210 

2178 NEXT X 

2180 FOR X=3.1416 TO 6.2332 STEP .05 

2190 IF COS(X>XC-CT)-''D THEN £216 

2268 ME XT X 

2216 V=-SINO0"-2.72 

?,;ic- i;GL = 320!'i;-:/B,?S3£sLi = -7a*v+oa 

2238 U=CCOL+Q>MOD 320:V=LI 
2249 IF C=CME THEN 1898 
2256 IF E=CME THEN £030 
2268 IF C=CV THEN 960 
22-78 IF C=CV THEN £050 
£289 IF C=CM THEN 736 
2296 IF C=CM THEN 2079 
2380 IF C=CL THEN 873 
2319 IF C=CL THEN 2990 

2329 IF C=CJ THEN 1410 

2330 IF C=CJ THEN £110 
£346 IF C=CS THEN 1550 
2350 'POSITION DES ETOILES 
Lli-ii CLi-'iCREEN c,0.4:ME-112 
2379 BOXFlB, 120>-' 7S&.20B -■ . 4 
2386 FOR 1=1 TO NE 

£390 READ A,B,C 

£490 PSEL i.fi+P.'MODJfiii.B.'.C 

2418 NEXT I 

2429 LOCATE0,14:PRINT ri MATIN 

MINUIT SOIR" 

2438 COLOR 4, 6: L0CATE21, le, 0: PRINT"C'ATE: 

*f JtHlflN 

i4 4 n 'ECLIPTIGUE 



1S50 



.INE170, 150.200.150.1 
-1NE200, 150,200,200, I 
IME30, 1T.0.6O, 170, 1 



2450 IF 0=0 THEN £518 
£460 FOR X=0 TO 1 STEP .02 
£470 V=-SINc;2*3. 1416»>;; 2.7£ 
2486 COL=320*X:LI=-70*Y*66 
£496 PSET<CCOL+0.>M0D328,LI ?, 1 

2509 NEXT X 

2510 GOSUB 2880 
£5£6 'ZONES CREPUSCULAIRES 
2536 IF ZC=0 THEN 2638 
£540 36=0!Z3-2iZI=8:24=6:GOSUE 2598 
£556 Z8=3I2'Z1=320:GOSUB £598 
£560 ZB=8sr.3 = y: 21 = 16: 24 = 4: &OSiJE: s^'iv 
£570 Z9=304:21=329!GOSUB 2590 
£580 GOTO 2630 
2590 FOR 1=0 TO 118 STEP 4 
2680 LINE<:Z0,ItZ3>-(21, I + Z3>,Z4 
2616 NEXT I 
2620 RETURN 

2636 LOCAT£0,22:CGLOR0,4!PftINT ,, Foui- tV 
gei* de date, tapei encore Sttr 1 

a barre d'espaee»ent. " 

2640 IF INKEV*v>CHR*(32:' THEN 264B 

2650 GOTO 110 

2660 DATA 43,7,6,56,13,7-44,21,7,59.7,,. 

do. £7. 7, 75, 14, t.. 73, 13. 7,73, 15, 7, 72, El, 7.. 

13,56.7, 13. A3. 7, 31 4. 43.7,3! 5, £5, 7, 32, 49, 

7. '^7. £1.7, 301, 17. -.293. 10,7,366, 12, 4,38 

7. 12,4.308, 11,4 

SS.70 [-«T f! 56, 52. k,=-,4G. 7,54,55,7, fi'?, lb, 

7,97, 1£.7,03,£1 . ~.?'i.,53, 7 , 100, 35- 7.?h,4;j 

,7,91,14,4, 131.37,6.127.25,7, ] £6, 15,7, II 

3. 11,7, 117,20,7,123.27.7,111,27,6, 113,25 

- 7 . IBS. £5,7, 108.22,7 

2680 DATA 185 , *5, S ■ it:?. 4 1 , 7, 162, 42, 7, If 

,-!6, 7, <3a. 37,7, !& 1.31. 7, 187,25, 7, 189,3: 

", ;^S. 4,, 7,£!9,£i3. t. 215. £5, 6,235,35,7,23 

1,40,7,251,6,6,256,8,7,254, 12,7,2^ " 

.244,8,7 

:-.■-? C'4TA 259,42,6,263,41,7,260,33,7,^48 

.£4, 7, £70, 3 1.7, £72, 32. 7. £74. 32, 7, £72, 34, 

7,274,34, 7,293.33. 7,287,65,6,280,54,7,39 

9,82,7 

2706 DATA 248,51,6,254, 70, 6, 247, 4-5. '- £i>- 

, 51. 7, 242, 72, 7, 249, b 1.7. 247, ^-2,7,245.-3, 

7.24.--.. 67. 4, 226. 75. 6. 23:. 79, 7.222,37,7,2! 

9,94,7,22,97,7,215,97,7,141,70,6,122,77, 

2710 DATA 100,93,6,101,82,7,184,84,7,106 

.57. 7, 10 7.91,7,97. 109.7.95, 195,7,90, 116, 

7,85.108,7.33, 185,7,85,182,7,72,91,7,74, 

94, 7, 78, 95, 7, 76, 98, 7, 68, 97, ?, 68, 92, 7 

£"Si, CHTA 49,70, 7 .4S.75,7,35, _ " 

7,43,93,7,37,61,7,179,68,7 

2730 CONSOLE,,, 1 

J.JU ifPEEM £.a,e:ATTRBl, 1 : LOCATE 12, 8, 0: 

PRINT"PLANETES":FORl=aTO1000:NE>:TI 

B75B J-iTTRBB, UCOLOPl: LOCATE 14,4:PR1NT"P 

:■■■-! TTijN DES" :L0CATE18,1£: PRINT "V1SIBLES 

- L'OEIL NU":L0CATE14,15:PRINT"ET DE LA 

_'JME '■^TTRBC- 5 :PP I NT: PRINT: PRINT: PRINT" 

SUR LEUR ORBITE ET DANS LE CIEL":-PR1H 
T" DEPUIS 1985 JUSQU'EN 2056" 
2760 FOR 1=0 TO 10B8:N£XTI 
2770 C0L0R5:PRINT:PRINT:PRINT" IL N'fl 
PAS ETE TENU COMPTE DANS LE" 
£780 ^SINTiPRINT" PROGRAMME DES VARIAT 
IONS DE VITESSE" 

2790 PRINTiPRINT" DE CHADUE PLANETE SU 
H SOU ORBITE" 
■ ?0u Pn:lNT:PRINT" 'MMPORTANTES POUR HE 
PCURE ET MARSJ," 
£-:■ ■ :j Pi?INT:PRIKT- 
DES ORBITES PAP" 
2820 PRINT:PRINT" 
ELLE DE LA TERRE.' 
2830 PRINT:PR1NT:PRINT"LA PRECISION EST 
TOUTEFOIS SUFFISANTE" 

£840 PRINT:PRINT"POUR UN REPERAGE TRES F 
ACILE A L'OEIL NU" 
2858 PRINT=PRINT:PRINT:COL0R4:PRINT" POU 
P PASSER D'UNE PAGE A LA SUIVANTE, 
TAPEZ SUR LA BARRE D'ESPflCEMENT. " 
2866 IF INK£y*OCHR*<32> THEN 2860 
2878 CONSOLE,,, 
2888 RETURN 



!0,7, 28,81/ 



RAPPORT 1 



•1NCLINAIS0N 
I DE C 



fmme * 



150.1 



200,1 



1670 LINE30, 130,30.80, 1 

1SB0 LINE30,B0.6ij,BO, 1 

1B70 LINE&0,BO.6O,I5O,l 

1900 LINE130, 130,130,80,1 

1910 LINE130,aO. 100,80,1 

1920 LINE100.BO, 100, 130,1 

1930 LINE100, 130, 130, 130,1 

1940 LINE170, BO, 170, 130,1 

1950 L1NE170, 130,200,130,1 

I960 L1NE2QQ, 130,200.80. 1 

1970 LINE200,80,170,BO. 1: RETURN 

I960 '****DEBUT DU JEU****I«*«* 

1990 WIPE:GOSUB3470 

2000 TONE 124, 165: TQNEB9.S20i TONEBO. 395: TONE 124 
TONEBO . 393 

2010 PEN0:PR1NT:PRINT!PRINT- LE JEI 

2020 T0NE7 1 , 320: TCNE7 1 , 320: T0NE7 1 . 320 : TONE7 1 , 4: 
NE67, 460: T0NEB9, 350 

2030 PRJNT:PRINT" 60 Ciilidtidti 0.^0.0,^0. toiiiiiibb W 

2040 TDNE7 1,320: TONEBO. 395; TDNEB9, 260: PAUSE. 1 

2050 PRINT" fc& tiiiiiiiixd .j(id>iai'j QQfltLtlb dCiii.JiJij 

2060 TONEBO, 395:T0NE71. 425: 



NEB9, 265: TONEBO, 395: T0NE71, 425 
2070 PRINT" Ci<j 04 dO 00 C1C1 lUH iiti uti (i& 
20BO TDNE71 , 320: TONEBO, 395:T0NE71, 425: T0NE71 , 3: 
NEB9, 350: TONEBO, 395 
2090 PRINT" tiii (id (1(1 00 GO ii(x ixix iiii Oti 
2100 TaNEBO,590jPAUSE.2:TONE124, 1B5 

110 PRINT" CiO {1(1 iiii dd ad id Ob iiii Hit 
•120 TGNEB9, 525: TBNEBO, 3,95: TONE 1 24 , 245 : TONEBO , B 



!130 F 



II NT" 



S»Q I 



M40 T0NE71,32O:T0NE71,32O:TONE7I,32O 



H60 T0NE71 , 435: T0NE67, 460: T0NE89, 350 



2200 PENliC0LQR©,l,2,3 

E210 TONEBO, 395: T0NE71 ,425: T0NE71 , 42S: TONEBO, 395 
2220 PRINT:PRINT" PAR AtJDRE CHABRAI50N " : Pf 

NT:PEN2:COL0R0, 1,2,3 
2230 T0NE89, 265: TONEBO, 395: T0NE71 ,425 
2240 PEN0:PR1NT:PRINT" VOULEZ-VOUS LA REGLE T 



1 :PEN2 



2250 TDNE71 , 320: TONEBO, 395: TDNE71 , 425: TDNE71, 320: TO 



425: TONEBO, 395: TO 



Asuivre... 



SCHLIRP ! 



Petit serpent plem d'adresse et de courage 

Engloutit tout sur son passage. 

Mais les murs sont indigestes 

Plein de fougue et d'appetit 

Partout gngnote en gambadant 

Petit mille pattes deviendra grand. 

Serge ET1ENNE 




300 LET I« = INKEV« IP Ijo'P' A 
ND Ilo'lD 1 THEN SO TO 385 
305 BEEP .01.13 
310 IF DLsffl THEN GO To 350 
320 IF Ilc'O' THEN LET DC = DL G 
TO 340 
330 LET DC=-DL 
340 LET DL=0 30 TO 390 
350 IF It="P' THEN LET DLsDC G 
TO 370 
360 LET DL=-DC 
370 LET DCafl 

380 PRINT AT L LP) ,C IP) , INK 1, ' 
9 

390 LET AP=P LET PaP + 1 IF P ><l 
2 THEN LET Pal 

408 LET C IP) sClAPI + DC LET LIP) 
■ L (AP) + DL 

4-10 LET R=ATTR kL(P;,ClPJ) IF 
A< ;53 THEN GO TO 500 
420 PRINT ST L(fil ,Cl"Q:> J *' ' 
430 LET 0=0+1 IF Q>4£ THEN LET 
= 1 

440 PRINT AT L(P).CIP), INK 1,' 
*V ■; BEEP .011,-40 BEEP .011,-30 
+50 GO TO 300 

500 IF h=B2 THEN LET Bafi-fl GO 
TO 860 

S10 IF A-1S2 THEN LET U = l. GO T 
650 

520 IF NOT B OR R=48 OR As49 TH 
EN GO TO 800 
530 LET B=B-1 
550 LET T=T+1 LET TT=TT+1 
580 PRINT PIT 21,3, INK 2,TT,AT 

570 BEEP .01,55: BEEP .005,62 
BEEP .008,59: BEEP .01,60: BEEP 
.005,69 IF T-E THEN GO TO 850 

580 GO TO 440 

600 PAUSE 1: BORDER 2: BORDER 5 
BORDER 4 BORDER 3. BORDER Fl 

IF INKEYt-"" THEN GO TO 600 

610 LET It=INKEYt RETURN 

540 REM PORTE 

6S0 PRINT AT 0,15+(-2 AND N=l) + 
l-l AND N=2) , FLASH 1, PAPER 3, 
INK 0, V - AND Nsl) *('' '■ R 

ND Ns2) + [" " AND N>=3) 

660 LET Z»T: IF NOT U THEN GO T 
300 

665 REM FIN DE PARTIE 

670 PRINT -AT LCOl.CiO)," " LET 

QsQ+1. IF 0>4a THEN LET 0=1 

880 BEeP .018,-40: BEEP .018,-3 
0: PAUSE 5 IF OOP THEN BO TO 6 
70 

690 GO SUB 2100+100*INT IRND*5) 
: IF nl=n THEN CO SUB 3100 

700 LET E=20 LET TT=TT+100*N 

710 GO TO 1020 

800 REM COLLISION 

a0S PRINT AT 81,8, INK 3)TT,AT 
21,88, Bi" " 

805 FOR X=3 TO 21 OUT 254, B-X/ 
3: BEEP .008, X: NEXT X 

80S FOR X=2l TO 3 STEP -1 OUT 
254, X/3: BEEP .B08.X NEXT, X 



Owl 

830 IF OOP THEN GO TO 810 
832 IF NO THEN GO SUB 2700 
835 LET P6-Pa+1 GO 5UB 3300 I 

F Pa>u THEN GO SUB 3400 
840 REM FIN OU RECOMMENCE* 
842 PRINT AT 2,4, PAPER 3, INK 

0, BRIGHT 1,'Une autre partie ?. 



THEN GO TO I 

0*/ if-' Its' O' THEN ou iu mkho 

S50 PAPER BORDER 0. CLS IN 
K 1: BRIGHT 1 

860 PLOT 0,0: DRAW 0,178: DRAU 
255. 0. DRAU 0,-175: DRAU -265,0 

864 PLOT 5,5 DRAU 0,165: DRAU 
245,0: DRAU 0,-165 DRAU -245,0 

870 BRIGHT 1: INK 0: PAPER 3 P 
RINT AT 6,8 '■*************". PRI 
NT AT 7,8,"* "j PAPER 6, FLA5H 1 
, "AU-REUQIR", FLASH 0, PAPER 3," 

*■': PRINT AT 8 , 8, ■'***#**»***** * 
. PAPER 

880 PRINT AT 12,12, PAPER 4, .. 
. El a bientot" GO sub 2800 PA 
USe 60. NEW 

900 REM Recommencer 

910 LET N2a0: LET NoN-2: IF Nt0 

THEN LET N=0 

920 LET E=£0 GO TO 1020 
1000 REM PREPARATION DU UEU 
1010 LET E = 10 LET NsO. LET T=0 

LET TT=0; LET FlsU LET PS =0 
1020 LET PaU: LET 0=U LET U = 
1030 LET DC=0 LET DLa-1: LET LI 
1) =12 LET Cll)=7 LET 8=0 LET 
NsN+U. IF N2 THEN LET N1»N1+1 
1040 INK 5 PAPER 6 BORDER 1 C 
LS INK 
1050 FOR 1=0 TO 31: PRINT AT , I 

1060 ' IF Kis'THEN PRINT AT 1.0," 

■ , AT I ,31, "■" 

1100 NEXT I INK 1 IF N>5 THEN 



LET £1=40 LET N=S 

1110 FOR J=2 TO N GO SUB 1800*2 

0*U-2) NEXT J LET £1=N0T PI 

1590 REM PREPA, BOUFFE 

1600 FOR 1=1 TO E 

1510 LET L=1+RND*17 LET C=1*RND 

#29 IF ATTR iL.C; 053 THEN GO T 

O 1510 

1S20 IF I>E/2 THEN PRINT AT L,C, 

INK 2, ■$■' GO TO 1640 
1630 PRINT AT L,C, INK 4, "B" 
1640 NEXT I 

1650 IF ATTR IL(1> .C(l) 1 <>53 THE 
N LET LID-2 + INT RNDH5 LCT C < I 
) aa+INT RND*27 GO TO 1650 
1670 PRINT AT Lll),Cll), INK 1, * 

1SB0 PRINT AT 21,1, INK 1, * POINT 

5 = ',TT,AT 21.20, BUNUS=',B 

1690 IF Z THEN GO TO 1710 

1700 GO SUB 2000 

1710 INK 5. LET TaO LET B=0 GO 

SUB 600 GO TO 300 
1300 REM SUB DIFFICULTES 
1801 FOR Is* TO 27 PRINT AT 9 , I 
;"■" NEXT I LET E>24 RETURN 
1820 FOR 1=3 TO 16 PRINT BT 1,1 
5,'i' NEXT I: LET E=28 RETURN 
1340 CIRCLE SB. 127, 7 CIRCLE 159 
,127,7: CIRCLE 88,71,7 CIRCLE 1 

" " , 7 . LE 

...._., LET At 
3, 14, "Hi" 
1865 PRINT AT 16,14, '■■" LET E 
=36 IF El=40 THEN LETEsEl 
1970 FOR 1=3 TO 6 PRINT AT 1,4, 
■■■'■ PRINT AT 1,27, "i' PRINT AT 
T*£,4, ,, | . PRINT AT 1+5,27, '■' 
PRINT AT 1+10,4, '■": PRINT AT I 
+10,27, "1" NEXT I 

1880 PRINT AT 3,5, A*. PRINT AT 3 
,19,A*,'i" PRINT AT 16,9,At PR 
INT AT 15,19, At, "'■" RETURN 
2000 REM HUSIOUES 
201i;' REM CHEUAL'CHEE DE5 UflLlwBie 

2020 RESTORE 5000 FOR l =1 TO 21 
READ d,n BEEP d,h NEXT i RE 
TURN 

2100 REM CUCRRACHA 
2110 RESTORE 5100 FOR i si TO 4. 

READ D,H BEEP D,H NEXT i 
2120 BEEP .12,16 PAUSE 12. REST 
ORE S100 FOR i=l TO S READ D,H 

BEEP D,H NEXT i 
2130 PAUSE 12 READ D.H B£EP D. 
H PAUSE 12 

2140 FOR 1=1 TO 7; READ D,H BEE 
P D,H NEXT t RETURN 
2200 REM DARLING CLEMENTINE 
2210 RESTORE 5200 FOR 1=1 TO 3a 
; READ D.H BEEP D.M NEXT I RE 
TURN 

2300 REM OH SUZANA 
2310 RESTORE 5300 FOR lal TO 17 

READ D,H BEEP D,H NEXT I 
2320 RESTORE 5300 PAUSE 18. FOR 

1=1 TO IS READ D.H BEEP D.H 
NEXT I 
2330 BEEP .2,7 BEEP .6,5: RETUR 

2400 REM IL COURT, XL COURT... 
2410 RE5T0RE 5400 FOR I»l TO 26 
: READ D,H BEEP B.M NEXT I RE 
TURN 

2500 REM DANSONS LA CAPUClNE 
2510 FOR 1=1 TO 2 RESTORE 5500 

FOR J=l TO 13 READ D.H BEEP D 
,H: NEXT J PAU5E 3 NEXT I RET 
URN 

2700 REM AN5I FONT FONT 
2710 RESTORE 5700 FOR 1=1 TO 25 
READ D.H BEEP D*.8.H NEXT I 

RETURN 
2S00 REM AU REUOIR 

2810 RESTORE 5300: FOR i .1 TO 26 
READ d,h: BEEP d,h: NEXT i RE 
TURN 

3000 REM sub ecriiuri phrases 
3010 BEER .05,-20 SEEP .05,20 
POKE 23592,255 LET LM31-LEN AC 
> /i PRINT TAB L, 

3020 FOR d=l TO LEN At: BEEP .01 
5 , -40 BEEP .015 , -20 PRINT INK 
0,AtiJ TO J), PAUSE 3: NEXT J 
PRINT RETURN 
3100 REM Sub fe u citations 
3110 RESTORE 4000 + 10 * iN-1) CLS 
: PRINT •'-': FOR i «1 TO 8. READ 

A| GO SUB 3000 NEXT I PAUSE 
100 RETURN 
3300 REM 5ub perdu 

3310 LET TSlsTSl+1 IF T51>4 THE 
N LET T51a0 

3320 RESTORE 4100+10*TS1: CLS 
PRINT ' ■ ' ' : FOR 1=1 TO 3: READ A 
S GO SUB 3000 NEXT I PAUSE 10 
RETURN 

3400 REM 5ub double perte 
3410 RESTORE 4200 READ At PRIN 
T ' TAB 7, FLASH u, INK 0,At 6 
EEP .05,-12 BEEP ,06,12 PAUSE 
50 

3420 LET TS2=TS2+1 IF T52>3 THE 
N LET T52-0 
3430 RESTORE 4210+10*T52. PRINT 



FOR lal TO 2 READ At GO SUB 
3000 NEXT I PAU5E 100 LET P6s 
RETURN 

4000 Data un petit serpent ptei 
n d idrMtt i"tt de courage qui 
engiovtit tout' , sur son passage 
. . . , MAIS ATTENTION . . . Les muf 
S SOnt", INDIGESTE5 II!' 
4010 Data pt.ein de fougue et d" 
sppetit, , Partout gngnote en g 
aiibadant,' , 'Petit mi L te-pattes d 
tvttnOr* 4 ,' grand, . .MAIS ATTENTIQ 
n a ne pas , 'se MORDRE LA QUEUE 



ai ttance. . .Ou 

e nabi tete , , . 

tu causes au 

urt .... Tu et 



4020 DATA "Queue 
e t le ardeur" , Quel 
. ' , sans mentir, s 
SSi ,"bien qy • i l c 
le , champion de 

fOlS! " 

4030 data parole si tu gagnes a 
u procham , tu passes PROFFESIO 
NNEL! ' ( " , Pour ies paiements en 
Liquid*' , "ainene un SEAU'lf 
4100 data Espece da grsine de c 
acahuette" , "voisnie non idtntifi 
ee , dis tu.'joues avec l«s or*i 
i lesr 

4110 data "Aiions, aiioru, resaa 
isis-ioi , " , " je suis sur que tu p 
eux fairs" , "encore plus mal 111 
4120 data "Hem 1 h«ai...dt te sig 
naie que te'. "but du j«u c'est d 
e faire ie ,'MEILLEUR SCORE Mi" 
4130 data he> Brain* de ceurg*j 

tu sais , que tu se 
ILLEUR sr'/tu n'eta 
UAISt I • ■ 
4140 DATA BRRUO! Continue comme 

ca et tu' ,"vas remporter L« pri 
:< NOBEL ,' de la MALADRESSEI II " 
4200 DATA ENCORE PERDU!,.." 
4210 data Aiions, atlonj, ne pi 
eure pas", "sur ie clavier, ca I 
abitt! s I " 

4220 DATA ' Rian ne sert de gernr 
..,.". it Faut taper a tcapSIU 
4230 DATA Dis fas essays de jo 
uer a jeun?" , 
4240 DATA "He 
s pour " ,*'»ppu' 

4500 data "Les gentiis auteurs t 
res syrapas ' ,"de cet EXCELLENT to 
9iciet te" , "remercient d'etre de 
vant ce bet","ecran, naigre Les 
lagmfiques", "programmes present 
es sur its" , "autres chaines 1 ... 
4510 data osons-nous*'. , ." ,' OUI, 
nous osons te faire ltl"i flCO 
manda lions suivantes 

4520 DATA "f Le but dfi Zi jfiU ti 

t trts" , "simp te II ne suF'it pa 

S d*","PARTICIPER, il faut GRGNE 

Rill" 

4530 DATA " * Ce j«u est formelie 



ous","'ies porteurs de moufFies!" 
4540 data "nous ne saunons trop 
vous' , "recoHnander de bien voui 
oir •'."entewer vos gants de boxe 
6 , . . . ."surtout pour les reciama 
t ion si " 

4550 DATA "*ll est rappeie que l 
es a^teurs' ."toujours aussi gent 
its et sympas" , ne pouront etra 
tenus pour " ,' responsabies des ev 
entueiies" 
4560 DATA "crises de ne 



age. 



rmes 



to 



ute' , "autre espece d'agrement 
•tat ", "acabi t , qui pouraient su 
rvenif" ."pendant ou apres L'util 

4570'data "dt ca sptindid* logic 
i«i.",'Son utilisation n'est rat 
tl","qu'*ux risques et perils du 
*■ , "desti" -- - 



"»*s 



ns. 



ie Edouaf-. 

4530 data En bref , en deux mots 

P lutot" ,' qu en cent, aliens dro 
it au but' , "sans se perare dans 
ies meandres* ', "du langage, et pa 
r ia wolf la , plus directe, fai 
sons fi des'.'vams bavardages.. 
. .ETC, ETC. . .' 
4590 DATA NOUS TE S0UHAITON3 DE 

BIEN , " T flMUSERI " 
5000 DATA .8,2, .8, -3, .3,2, . 1, -3- 
.2, 2,. 6,5,. 6, 2,. 3, 5,. 1,2,. 2, 5,. 6 
,9..6,5l.3,9,.i,5,.2,9,.5,12,.6, 
0, .3,5,-1,0, .2,5,1.2,9 
5010 DATA ,1,0, .15,5, .05,0, .1,5, 
.3,9, .3,5, . 15,9, .05,5, . 1,9, .3, 12 
, . 3 , 9 , . IS , 12 , . 05 , 9 , . 1 , 12 , . 3 , 16 , . 
3,4, .15,9, .05,4, .1,9, .6, 13 
5100 DATA . 1,7, .1,7, , 1,7, .3, 12, . 
25.16 

5110 DATA .2, 16, .1,12, .1, 12, .1. 1 
1, .1,11, ,1.9, ,1,9, .2,7 
5200 DATA .1,7, .1,7, .2,7, .2,2, . 1 
,11, .1,11, .2, 11, .2, 7, .1,7, .1,11, 
.3,14, .1.14, .1,12.. 1,11, .4,9 



5210 DATA .1,9, .1,11, .2.12, .2,18 

,.1,11,. 1,9,. 2, 11, .2,7, ,1,7, .1,1 

1, .2,9, .2,2, . 1,6, .1,9, .4,7 

5300 DATA .1,5, .1,7, .2,9, .2,12, . 

2 , 12 , . 1 , 12 , . 1 , 14 , . 2 , 12 , . 2 , 9 , . 2 , 5 

,.1,5,. 1,7,. 2, 9,. 2, 9,. 2, 7,. 2. 5, 

4,7 

54C0 DATA .2,0, .2,5, .2,7, .4,9, .; 

,7 ,. a, 7,. 4, 2,. 2, 5,. 2, 4,. 2, 2,. 2, 1 

, .2,2, .2,4, .2,5, .2,0 

5410 DATA .2,5- .2,7, .4,9, .2,7, .2 

,7,. 4, 2,. 2, 5,. 2, 4,. 2, 2,. 2,0,. 2, 2 

, .2,4, .4,5 

5500 DATA .4,7, .2,9, .2,9, .2,14, . 

2, 14,. 2, 11,. 2, 11, . 2, 7,. 2, 9,. 2, 9, 

.2,14, .2,14, .4,11 

5700 DATA .a, 7. ,2,E. ,4,7, .4,11, . 

4,14, .a, 12, . 2,1 1, .2,9, .2, 12, .2,1 

1, .2,9, .2,11, .2,7, .2,7 

5710 DATA .2,2, .4,7, .4,11, .4,14, 

.2, 12,. 2, 11,. 2, 9,. 2, 12,. 2, 11,. 2, 

9, .4,7 

5800 DATA .6,0, ,9,5, .3,5, .6,5, „= 

,9,. 9, 7,. 3, 5,. 6, 7,, 6, 9,. 9. 5,. 3, 5 

, .6,9, .6,12,1.8, 14, .6,14, .9,12, 

3,9, .6,9, .6,5, .9,7, .3,6, .6,7, .6 

9,. 9, 5,. 3,2,. 6, 2, . 6, 0,1.2,5 

8000 REM . . . LAIUS 

8010 INK PAPER 4 BORDER 1 ' 

LS 

8020 BEEP .05,-20: BEEP .06,20 

RESTORE 4500 

8030 FOR 1=1 TO 7 READ A( GO S 

UB 3000. NEXT I PAUSE 100 

8032 FOR i=8 TO 44 READ At. Gi 

SUB 3000 NEXT I PAUSE 100 

9000 REM DEPART DU JEU 

9010 RANDOMIZE POKE 23581,5 

OKE £3609,20 POKE 23558,1. POKE 

23888,8 
9020 DIM L142) DIM C<42) : LET 
■NOT PI: LET Z=0 LET U=SGN PI 
LET Mile LET N2-U-: LET D*="P" 

LET Gt = ,, 0" 
9025 LET TSlaQ: LET TS8-0 
9030 DATA 60,110,207,255,247,143 
, 126 , 60 , 36 , 126 , 195 , 90 , 90 , 196 , 126 
,36 

9040 DATA 198,40,56,124,254,186, 
56 , 238 , 170 , 186 , 186 ,254 , 124 ,56,40 
,238,0,0,0,0,16,0,0,0 „ „ 
9050 DATA 83,44,89,64,73,69,76,7 

9060 RESTORE 9030: FOR Ie0 TO 39 
: READ A POKE U5R "A ,P + I,A: NEXT 

9070 REM A B C O E 

9071 REM I & | * 

9100 PAPER 0- BORDER 0: CL5 I IN 

9102 PLOT 0,0 DRAW 0,175 ORl=W 

255,0, PRFIU S.-lTg. PfifiH -255,0 

9104 PLOT 5,5: DRAU 0,165- DRAU 

245,0. DRAU 0,-165- DRAU -245,0: 
BRIGHT 0. INK „ T „ 

9110 PRINT AT 5,3, PAPER 4, BRIG 

HT 1, " REDEFINITION DE5 TOUCHES 

9120 PRINT AT 8,10, PAPER 5," Dr 
Oite:", PAPER 0J " '■, PAPER 3, FL 

ASH 1, ' ,d(i '' 

9130 LET FlnO: FOR lal TO 3. BEE 
P .005,36. BEEP .005,48: NEXT I; 

GO SUB 600 
91*0 LET dS-i>: PRINT AT 8,20, P 
APER 6, " ",dt; " " 
9150 FOR i«l TO 50: NEXT t 
9160 PRINT AT 12,10, PAPER 5," g 
aucht:"; PAPER 0," '"; PAPER 3, F 
LASH 1, ' , gt, '■ 

9178 FOR 1=1 TO 3: BEEP ,005,29: 
BEEP .005,41: NEXT I: GO SUB 60 



9130 LET 9tai). PRINT AT 12,20, 

PAPER 6, " ".gii" 

9190 FOR i»l TO 40: NEXT i 

9200 PRINT AT 16,7, PAPER 2, BRI 

GHT 1, " OK 7. . .0/N 

9210 FOR I«l TO 3: BEEP .005,36: 
BEEP .005,46 NEXT I: GO SUB 60 



9220 IF iio"0' AND itO"N" THEN 
GO TO 92 10 

9230 IF it="N" THEN GO TO 9100 

9240 LET AsPEEK 23635 +25&»PEEK 2 

3636 

9250 POKE H+13,C0DE DS POKE A+l 

64, CODE Dt 

9260 POKE A+S2,C0DE 01: POKE A+9 

5, CODE Gt 

9300 GO TO 10O0 

9996 5AUE "SChlirp! " LINE 6000: 
STOP 

9997 INK 0. PAPER 7. BORDER 7: L 
LS : PRINT "EFFACE": ERASE " m" , 1 
, "SChlirp! " 

9998 INK 0: PAPER 7 BORDER 7: 
LS PRINT "SAUUE" SAUE l"a"i 
"SCh li rp I "' LINE 8000 

9999 INK 0: PAPER 7: BORDER 7; 
LS PRINT "UERIFIE" : UERIFV * ... 
", l, "ichurpr * 



HEBDOGICIEL 27, rue du Gal-FOY 75008 PARIS 

VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 420 FRANCS POUR 52 NUMEROS AU LIEU DE 
52 x 10 =520 FRANCS. ABONNEMENT POUR 6 MOIS : 220 FRANCS. Pour I'etranger: + 80 F. pour 1 AN 

+ 40 F. pour 6 MOIS. 
NOM : MATERIEL UTILISE : 

PRENOM : CONSOLE : 

ADRESSE : PERIPHERIES : 

REGLEMENT JOINT : D CHEQUE D CCP 



DA O 



Profitez pleinement des possibility graphiques de 
voire bel Amstrad tout neuf. 

Olivier MAROLLES 
Mode d'emploi: 

Laissez libre court a votrs imagination 
10 REM *************************** 560 IF c*="F" THEN GOSUB 1330'QQSU 
****** P 858 'GOTO £49 

20 REM ** 570 IF c»>="l" RND c*0"4" THEM r_ 9 

** *VRL<e*)-l GOSUB 1339 

38 REM ** D.fi.M V*r»i«W 2 530 GOTO 240 

** 590 CIS #1 'PRINT #l,"(P)lein ou <V 

4G* REM ** )id« ''"FOR fcP»l TO 5ft'**»INKEV*'M 

600 a«wtJPPERKINKEV»>*rF X9*" GOT 




SB REM ** eerit Paur HwstfMd 'PC 4 

64 ** 

60 REM ** par Olivier NtrottB* 



80 REM **le 2ft*8U84 
** 

90 REM *************************** 

****** 

100 MODE 1' CLEAR 'DEFINT 3.-4 

110 OH BRERK GOSUB 1 ,'50 

120 SPEED KEY 2.. 2' OH ERROR GOTO 1? 

59 

130 DEG 

140 INK 9.1 INK 1.24PHPER 8 = PEN 1 

BORDER 1 ■ CLS = LOCATE 12,2 PRIHT "D 
.R.O. Version 2" LOCATE 12*3. PRINT 

STRING*? 16,216) 'PRINT PRINT 'PRINT 
150 LOCATE 1,16'PRINT "Mode d'emPt 
Of (0 m N) ? %CHR*(143>j 
160 **-UPP£R*<INKEY»>=IF 3.9="" OR 
■U*O"0" AND *»0"N" AND a*<>"X") 
THEH 160 

170 SOUND 1,300,50,7- IF a*="0" THE 
N GOSUB 1460 
180 CLS 

190 C**»S'Cf=0 = DE'=6'INK 0.23 INK 1, 
B'lNK 2,6'INK 3, 11 -PAPER #0,0=PEN 
#0,1 'BORDER II 'WINDOW #1.1,40.25,2 
5'PAPER #1..1'PEN #1,.0'CLS #1 'GOSUB 

840 
200 xa=320 ' ya=288 
210 xb=xayb=ya 
220 x=xa=y=ya 

230 CLS »1 'PRINT #t . "SHIFT-Cl R-HOP 
Y-V-R-F-C-E-T-D-fl-S-W-H-L-Q" i 
240 t=TEST< x , y ) ' **=> I NKEY* 
250 PLOT «i».cf»FSR tP=*l TO 38'NEX 
T -PLOT x,y,c*> FOR t.P»l TO 30 NEXT 
260 c*=UPPER*f INKEY»>i IF r*="" THE 
N 250 

27S c=RSC<c*)> JO»-.IOY(0VIF C>243 T 
HEM C=G-4 i GOTO 300 
280 IF Jo>16 THEN ..o=Jo-16 GOTO ^0 



AND a*< 



296 PLOT x.y.t 
300 IF c=24? THEN 
24B 

310 IF c*243 THEH 

240 
320 IF c=240 THEN 



•=x-DE*dr*0-GOTO 
:»x+DE<dr-0-GOTO 



f 

610 SOUND 1,284 IF a*< ; 
>"V" THEN RETURN 
620 IF a*="P" THEN ORIGIN 0.0,MW 
xa,x),MAX<xa.x).MRX<ya.y > . M I N<: y a. , <j 
> CLG re 'GOSUB 840 'RETURN 
630 DRAW xa.y.ct'DRAW xauva.cW'DRfl 
W x.ya.ceDRAU *,y ,ca RETURN 
$49 ELS #l' PRINT #1 ■■•'- fi)nneau ou < 
Oiisque ''"'FOR tP=l TO 50'**- INKEY 
* i NEXT 

650 a*=UPPER*< INKEY*)' IF a**"" THE 
N 650 

660 SOUND 1.284' IF a*O"0" AND a*<" 
>"R" THEN RETURN 

670 CLS #l'r-SQR<<xa-xr i 2+<ya-iO~2 
)'IF «**"D" THEN T=r*2 FOR dx*-r T 
r STEP 2'd**S0RCz-<dx' v 2>'J:PLOT * 
a+«tx . M a+dy , re ■ DRRW xa+dx . »«-dSf ■ C« ' 
IF INKEY <68)<>0 THEN NEXT dX'RETU 
RN ELSE RETURN 

680 PLOT xa«H*,y»'FOR k*0 TO 360 ST 
EP 5 DRAW X*+r*<3QS<IO,S*+t**SIN<l(>j 
ceNEXT k'RETlJRN 

690 SPEED KEY 10.2 'GOSUB 1020 CIS 
#1' INPUT #1 , "Increment * C0.1 a 20 



> A 2) 

720 IF 21=0 THEH RETURN 

730 ZX"Gx*-Xb V*l i zy^ai-vb'/K 

740 FOP Za-0 TO 21 STEP zi 

750 PLOT x.y,c*'DRRW xb+Za*zx,yb+2 

a*zy,ce 

760 NEXT 2a 

770 SPEED KEY 2.2 'RETURN 

730 CLS #1 PRINT #1, "Vitesse de de 

p t acement (1-9) ? 

790 *=VAL< INKEY*)' IF a<l OR «>9 GO 

TO 790 ELSE de-*' SOUND 1.284 RFTUP 

N 

890 PLOT «,..« CLS #1 'PRINT *1,"< 

a>=f\or-«,*.l,t. 1 )=X0R.<2i=RND,C3)«=0R '? 

"j GOSUB 1020 

310 M*=INKEYS'IF m*=""THEN 310 

820 m=VRUm*l<IF m<0 OR m>3 THFN 8 



=y+DE ' dr=0 = GOTO 

330 IF c<*241 THEN y=y-DE' dr=P GOTO 

240 
340 IF J0=1 THEN Y-Y+DE ■ DR-0 ' GOTO 
240 

350 IF J0=2 THEN Y=Y-DE ' DR>=0 GOTO 
240 

360 IF J0«4 THEN K»X-fiE 'DR-0' GOTO 
240 

379 IF J0=8 THEN X=X+DE 'DR=0'GOTO 
240 

380 IF J0=5 THEN V=Y+DE < K«K-DE ' DR» 
0GOTO 240 

390 IF J0^6 THEN Y=Y-DE X=X-DF'DR= 

GOTO 240 

400 IF J0=9 THEN Y-Y+DE ■ X-X+DE >DR* 

0'GOTO 240 

410 IF JO=10 THEN Y-Y-DE ■■ X=X+DE i DR 

=0'GOTO 240 

420 IF C»16 THEN GOSUB 1330. GOTO 9 

80 

430 IF <c=224 OR J0>15) AND dr=0 T 

HEN PLOT x . y . ce ' xb=Xfl yb=YA ■■**=* 'm 

a=y dr=l GOSUB 1330-GOTO 240 

440 IF C*="V" THEH GOSUB 1330'GOSU 

B 788 'GOTO 230 

450 IF c«-"D" AND fxOxs OR yOya) 

THEN GOSUB 1330'PLOT :^A.ya..-e'DRRW 

x . y , ce ' xb«xa i y b=y a 'm*V ' x*»x i GOTO 

240 
460 IF c»«"U" THEH GOSUB 1330 P| riT 

x.y.ce GOSUB 1930 'GOTO 230 
470 TF c»«"C" THEN GOSUB t330 = f;OSU 
B 640 GOTO 230 

480 IF c*»"M" THEN GOSUB 1330'GOSU 
B 800 'GOTO 230 

490 IF C»""R" THEN GOSUB 1330'GOSU 
B 590 'xa*X'ya=y 'GOTO 230 
^0O IF cS»"0" THEN GOSUB 1330'GOSU 
B 1340. = GOTO 230 

510 IF c*s"T" THEN GOSUR r-n0 i.O^.n 
B 690 GOTO 230 

520 IF c«="S" THEN GOSUB 1 438 GOSU 
B 920 GOTO 230 

530 TF e**"E" THEN GOSUB 1330'GiiSU 
B 1130'GOTO 230 

540 IF c*="A" AND CvhOxJI OR yb-Oy 
*;) THEN GOSUB 1330 'PLOT xb,*b.Cf '0 
RAW x* , v f. , cf i x=xb ' a =y b ■ x«"xb : a««ab 
'GOTO 240 

550 IF <:*="L" THEN GOSIJB 1330'GOSU 
_B 8?@ GOTO 230 



00 

830 SOUND 1-234. 10 'PRINT CHR*<23 5+ 

CHPIICm). RETURN 

845 ORIGIN 0.0,0,0.0.0'CI.G rf'ORir, 

IN 0, 0.0.640. 400, 16 i RETURN 

850 dy=yb-y*'dx=xb-xa'Pl.OT X*tf.M< 

DRRM xa.ya.ce DRAW vb.vb.ce-DRRW X 

+dx,y+dy .ce DRAW x.y.ce 

S569 RETURN 

870 GOSUB 1020 'SPEED KEY 10. *' FOR 

u=0 TO 3 

888 CLS #1 -PRINT #l,"Couleur d* V 

encre viuwero *tw INPUT #l,a* 

S90 gmWLi **>' IF r<0 OR C>26 THEH 

880 

900 INK w,c GOSUB 1330'NEKT u'INPU 

T #l,"bordur»'"ja*'c-VflLC**>»lF c<r 

OP C>26 THEM c=ll 

910 BORDER C 'GOSUB t33CnSPEED KFY 

2.2' RETURN 

920 r*SQR<< " xa-x l"2+< ya-y >"2> 

930 CLS #1 'PRINT Wl.'TiirreffiP.nt 1- Q 

940 a=VflL< INKEY*^ IF *< 1 OR a >9 GO 
TO 940 

"50 CIS #1'F0R k=0 TO 360 STEP a.'P 
LOT xa.ya'DRAW xa+r*COSt k Vaj+rM 
N<k ),ce 

960 IF INKEY<S8K>0 THEN NEXT k 
870 RFTURN 

930 CLS #1 PRINT #I."vn.iS VOUl«X O 
ffacei" ? •TO/N)" 'GOSUB 1820 
998 a**UPPER*<: INKEY* ) IF aS="" THE 
N ^90 

1000 SOUND 1.284' IF a*=="0" THEN CL 
G cf GOTO 200 
1810 GOTO 230 

1020 FOR tP=l TO 20 aS=INKEV*'NEXT 
t-.p RFTURN 
1030 CLS #1 SPEED KEY 10.3'PPINT # 
I, "•rT>ext-p ou CCihr* ?" 'GOSUB 102O 
1040 a*-UPPER*< INKEY*-" IF >.*="" TH 
EN 1040 

1050 IF a*0"T" AND *»0"n* THEN 1 
120 

1060 SOUND 1.234.10'TAG #0 IF a*«" 
T" GOTO 1100 

1070 CLS #1' INPUT #l«"cod« chr»'"i 
r* 
1B80 r *VflUc*>'IF C<0 OB <->255 THE 

N 1030 

1090 PRINT *0,CHR«<Oj GOTO 1039 

1100 CLS #1' INPUT #l."T*vt«S '"'T* 

1110 PRINT T$; 

1120 TRGOFF #0'SPEED KEY 2,2 RFTUR 

N 



1130 CIS #1 =eP=0 e^.=0PRINT #1."CP 
■>lein*r ou. <V>idf 'S>oleil »" FOR t 
P=l TO 50-a*=IMKEV!B-NEXT 
1140 a*=UPPFP*'- INKFYtV IF a*=«"" Cfl 



TO 



140 



1150 SOUND 1-284' IF **<>"P" AND ■»* 

<>"V" AND a*<>"S" THEN RETURN 

1160 IF a*B"P" THEN eP=l 

1170 IF a*="S" THFN eS»l 

1180 PLOT xa.ya.cf 'PLOT xb.yb-cf'P 

LOT x.y,(re=IF X»<xb THEN ex=xaxA= 

xb'xb=e::■' , 

1199 IF x<xb+t OP x>xa-l THEM PI OT 
x,y.cf 'RFTURN 

1200 PLOT xa.y3.cf 

1210 7r«Cvj-xb)^2'zo=fya+xbV? 

1228 zq=SQR''zi--'-2-<x-zo) rt 2J PI OT XS 

,yb,ce 

1230 z?.=(s-vbV?«'IF a*="V" THEN r 

t=2=G0T0 1269 

1240 GOSUB 1020 SPEED KEY 10. 3 CLS 

•1 = INPUT *1 . " Iwa*enwnt <. . 1 a 9) " 
■St 'SPEED KEY 2.2 
1250 IF zt<0.1 OR Zt>9 THEN 1240 
1260 CLS ftl'FGR zi=0 TO 360+O80*f 
eP=l>> STEP zt 

1278 u.=<xa-Z'-:'+zr*C0SC7l ) "-'=yh+zs* 
2r*SINfzi) 

12B0 IF-es-1 THEN PLOT ro.yb.ce 
1290 DRRW u.v.ce 

1300 IF tP»l THFN DRAW u ■ at=-?-s*zr* 
STNf zi 1 PLOT u.v.ce 
1318 IF INKEV(S8H>0 THEN NEXT zi 
1320 RETURN 

1 330 SOUND 1.100,10 RETURN 
1340 CLS #1PPINT #1, "<S>a>.'.ve9arde 

on (OhvStmttit ^" GOSUB 1020 
1350 =>.*=UPPER*( INKEY*)' IF a*-"" TH 
EN 1350 

1360 IF **0"3" AND a*0"C" THEN R 
ETUPN 
!37i'i GOSUB 1330 IF a*="C" THEN 142 



1380 CI S #1 PRINT #1, "RPPuyer su.r 

RFC 8- PLAY Puis ENTER."; GOSUB 102 



1390 IF INKEY C1SX30 THFN 1390 

1400 CLS #1 SPEED NPITE 1 SAVE "'D 

ESSIN",B.ft:C000.fe4000 

1410 RETURN 

1420 CIS #1 PRINT #t."APPuaer sur 

PLflY puis. ENTER, "J GOSUB 1320 

1430 IF INKEY MSK>0 THEN 1.430 

1440 CLS #1 LORD "iDESSIN" 

1458 RETURN 

1460 LOCATE L16'PRINT CHRSCI8>; 

1478 LOCRTE 1.6= PRINT " Ce Pro9r 

^mme pertnet de tr-acer de* dessi 

t>s aw I'ffcraii.il Possede d« 

■nombreu^ef. fovfCfcietn*, accp^sihlps 

Par flimPIe aPPttif ^ur um touch 
e. 

1480 PRIMT'PRINT'PRINT"Voici la H 
«te de *»* foncticms' 
1490 PRINT -PRINT PRINT CHRiC ?40 ~<: " 

".rHR*C241 )." " i CHRW 242 > i " "»CHR 
%< 243>.;"'dePlacsnt 1# o."-seu.r "PR 
TNT " (on JOYSTICK) 

1500 PRINT PPTNT"-SHIFT Si cette 
■houeh* tat enfoncw P'?^ 

d*Tlfe le dePlacemeiftt du 

cW"*#ut"i celu.i-ci Ui****** un» 
trace. FIRE 2 a It wt»« p+" 
Ft* avec le Joystick. "= 

GOSUB 1720 
1518 PRINT"COPY-C ou. FIRE 2) Valid* 

la Position couramte r*i 

Cttrs«ur cmise e^ memoir 

es.Cett* touche sert aussi 
de fonctioTi PLOT. 

1520 PRINT'PRINT"-CLR-Efface Veer 
an ^raPhi'lup aPres corifir 

matlOYi. " 'PRINT = PRINT"-V- Modif ie 
la vlt***e de dePlacetnerit du 

cjrseui".E'ntrer la taille du. 

dePlacemerit en Pixel. 
1530 PRINT PRINT"-R- Permit de tr 
ic^r- de;. rectaTi9!es vide?, 

ou PleiYi*.Valider une 
extremite d'Utw diato^ale avec 

-P- Pais Placer l* curseur s 
u.r I J au.tr«- extrernite.r'iiia 

-R-. 
1540 PRINT PRINT" -F- Trace U.-R Par 
aLlelo^rjfume valider ;? Polvi 

ts avec -P- , Puis Placer le 
curgeur aur U.^ trni5i»iyie Point 

et taPer -F-." GOSUB 1720 
1558 PRINT'PRINT"-C- Permet d» tr 
acer un cerele ou «n dis-'ue 

' v«lider le point central 
avec -P- puis Placer le curseur su. 
r -,m Point PeriPberi^ue Puis - 

f-. 

15fi0 PRINT'PRINT"-E- Trace une r>\ 
UPse.vide ou. Pleine. valide 

r lea extremites de la ba«-e 
horizontale-Puis Placer I* curseur 

|«f la periPhene sou^aitee 
■ Puis -E-.La fin**** du. b*.la 

ya,qp '"iePeniH de 1' increment c 

ho 1 s t . 



3«^70 PRTNT PRINT"-T- Trace un <ti 
an9I? entre 2 Points ^reced 

artmertt va Tides Par -p- ,et 
la position couravite du cu.rseu.r. 

Un increment de ba'aya9e el* 
V* Periwrt de-s effttc sPec 

iaax. 

1530 PRINT PPINT"-D- Trace UYW 
9Tie entre un poir>t Preced 

amfient valide. et la Position 
courante du curseu-". " GOSUB 1720 
1590 PRINT"-R- Efface la derniere 

li^ne traces. 
1600 PRINT =PRIMT"-S- Trace un ' 
leil' de centri*.!-?. dernie 

r Point valid**, et dont la 
PeriPh<=-rie est sur le CU.rseur.Plu. 
1'increwent est 9rand, Plus 
les 'ra^on-a' sont ■ssPares. 

1618 PRINT PRINT N -W~ Ecrit soit I 
n texte.soit un rar»fc 

re CHR* a Paftir de la 
position courarifce du curseup 
1620 PRINT 'PRINT"-M- Change le mo 
de f\' impression 1 8=mode 



ale 

l=mode XOR j le 



iint 



all um. 



'alUime 4u.e 



Poii 



-.1 in 



il n'y a rien d'allume 
2*«ode AND ile Point 

s' il y a du J a un 



1638 PRINT" 3=mode OR le Point 

s'allume tout le tentPs. " 'GOSU 
B 1720 

1640 PRINT'PRINT"-L- Permet de i 
an9er le3 co'J.lsu.rs des encres 

et du bord. 
1650 PRINT'PRINT"-0- Rcces W « 
netoPhone; on Peut 1 -sauve 
r I'tmaSe actuel le 
-rhuMMN* une tn«4* Precedante. 
1660 PRINT 'PRINT"-1^4-Powr chancer 

l'#ncre du. stylo; a rot- 
iSine' 
i«tolinc -'couleur de fond 1 *" 'PRINT" 

2««noir" 'PRINT " 3»rou.9e"'P 
PINT" 4*bleu. ciel" GOSiip 1?2P 
1670 PRINT'-reMarques-" PRINT PRINT 
■ PPINT"-la combinaison des. fleches 
■de shift, et de -V- Permet de trac 
er des Pointi I les. "'PRINT 'PRINT"- 
our 9omM*r . il suffit d'eCrirS a 
ec 1'encre du fond. 
1680 PRINT'PRINT"-Seul le Joystirr 

Permet des dePlacement 

I en diagonals. 
1698 PRINTPRINT"-Rttention, la to 
uche FIRE correspond l la touche 
OPY fluand le evrseur est iwmoh 
ile, et a la touche SHIFT quand il 

est en deP lacement. 
1780 PRINT'PRINT"-Il est Possible 
d J iiiterrnniPre les fonctions - 
C~.-E-.-S-. 9race a la toucheTRBi 
i~. n Peut alors tracer des 

d<?mi-disflues.d*s dewi -ellipses. . 

1710 GOSUB 1720 RETURN 

1728 LOCRTE 1.25 PRINT "TaPer ENTE 

R Pour continue!*. .. 

1730 IF INKEY (18K>8 AND IHKEY<7« 

X>8 THEN 1730 

1740 SOUND 1.234 CLS RETURN 

1750 INK 0.1.TNK 1,24'PEN l'PAPFR 

8' CLS BORDER 1 'SPEED KEY 10,3'STOP 

1768 CLS 

1778 A*=INKEY* IF fl*="" THEN 1770 
1780 LOCATE 1 . 1 PRINT RSCfR*). GOT 
1770 



+ MSX 



Suite de la page 8 



3030 
3040 
3OS0 
30*0 

3070 
3080 

3090 
3100 
3110 
3120 
3130 
3140 
3150 
31*0 
3170 

3iao 

3190 
3200 
3310 

3ZZ0 

3230 
3240 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



11111000 
10000000 
i 1000000 
11000000 
11000000 
01000000 
OOIOOOOO 
00010000 



SPRITE DE LA FLAMME DU MOTEUR 



DATA OOP 10000 
DATA 00111000 
DATA 01111100 
DATA 01111100 
DATA 00111000 
DATA 00111000 
DATA 00010000 
DATA 00010000 



SATELLITE 



Faites comme les grandes puissances, payez-vous le 
lancement d'un satellite et simulez a votre guise la tra- 
jectoire de ce dernier dans un systeme de planete a 
™*echoix. Patnck DELCOiGNE 

1020 IF M(1X=0 THEN PRINTCHR*(27) ; : GOTO 1010 

1030 PRINT"Rayon de la "PL*" en km : "i i INPUT A 

(3) : RC1)=A<3) 

1040 IF R<1)<=0 THEN PRINTCHRS(27) 1 :GOTO 1030 

105B R(l) = R!l) * 1000 • en metres 

1060 IF PL = 1 THEN 114.2 

1070 INPUT "Masse de la planete 2 en k 

g ■ "*A<4> iW(2)=A<4) 

10B0 IF M(2X=0 THEN PHINTCHR9(27>; :SO 

TO1070 

1098 INPUT "Rayon de la planete 2 en k 

m I •}A<3):R(2)=AI5) 

1100 IF RI2K-0 THEN PRINTCHRS ( 27 ) l :SO 

TO 1090 




1110 








R(2> « 


R(2> • 1000 


'.n m 


1129 








INPUT 


Angle forme Par 


la dro 










i pUnetBa'!A(7l 


! GAMMA= 


1130 








GAMMA 


= GAMMA * 3. 1413927/1B0 














1140 








INPUT 




nt les 


res des 




*1AC6):DI=A<6) 




1150 








DI = DI * 1000 


'en m £ 


1160 


POKE 16409 


1 


'Deblocage des 


majuscu 


1170 


IF 


PL =2 


THEN 1=512 


ELSE 1=236 




1160 


PRINT3I 


"Coordonnees de lancement 


du sate 








de la -PL*- er 








0000 




00 > " i : I 


IPUT A(B),A(9> :L 


!=A'(B>:i 


[9) 














1190 


D( 


} - SOR 


LX*LX + 


LY*LY) 


"Diet. 


"1-* 












1200 


LX 


- LX 




000 






L210 




■ LY 




000 




en met 


1220 


D( 


) - BQR 


LX»LX + 


LY#LY> 


Dutan 



.230 IF D(1)+100B-;R(!) THEN PRINTaB96t"A ee Jour, 
in ne fait pas encore decoller les satellites de 

1" inter ieur des plane tea ! ■ • • j :goto (100 
.240 IF PL = 2 THEN 1430 
250 VE ■ SGRC2*G*M(1)/D(1) > 'Vite«s 



1260 




VC 


• SOR 


6*11(1 


>/0(l) > 


VI 
















1270 




VL 


= SOR 


2»G»MI 


n*R(i y / (D(i 


R C I > +D f 1 ) > } ) 








le 


ellite 














12B0 




CLS 


PRINT 


Lane erne 


nt en <""LX/10 


km.'lLY 


1000; 




364,"soit a u 


ne altitude 




( < (D<1) 




1000 


+ .3)" 








1290 






NTSTRINGSI64, 


95) ; 




1300 




CO 


= ABS 


LX/SQRI 


.X*LX+LY*LY 




1310 




IF 


LX=0 THEN DE) 




rii 


degree ) : 


i SOTO 1330 








1320 




IF 


LY=0 THEN RO 


= 90 1 SOTO 1340 










(CO/SQF 


: t-co*co>)« 


RH 


415927 


angle 


tangent a 


a traje 


ctolre expr 


M 



t360 

i370 



PRINT'Vo: 
PRINT 



ntea vltesscs i 



DES 



PRIN 



e-INT!VL)"m/s 
Ve I V pour I 
."INT<VO"m/5 

Ve i V d'ivn 
."INT(vE>"m/s 



male pour mettre 



.400 

Vc 

.410 



'RINT-0— 



- ELS 



PRINT" portion ellipee/ I 
cle/ellipee/parabole/ hyperbole" 
1420 PRINTSTRING»(64,93>; 

1430 INPUT "Angle de lancement 
ALPHA=A(I0) 

1440 ALPHA - ALPHA * 3.1415927/180 
1450 INPUT "Vitesse du satellite en m/s 
1460 PRiNTaB32,CHR*<3D* "Dimension de i 
servable en km "i:INPUT A( 1 1 ) IKM=A( 1 1 ) 
1470 KM - KM* J 000 
14B0 IF KM<=0 THEN 1460 
1490 INPUT "Intervalle de temps de calci 



500 IF IT=0 THEN PR INTCHR*<271 i :GOT0 1490 
510 INPUT "CECI VAUT POUR LA C6P-115 ! Sur i 
inte (O/N) "iR*:IF R*="0° OR R*="o" THEN PR= 

E PR=0: GOTO 1620 

1520 CLS 

1530 PRINT'Dimensions du cadre sur imprimante : ■ 

1340 PRINT 

1550 PRINT"S1 vous ne garde; pae X*Y, les planetes 



360 PRINT" X ot Y ne peuvent pas depasser 9,6 cm" 

570 PRINT:PRINT"X i Largeur do cadre len cm) I "1 

INPUT XB i XA*XB#50 

5B0 IF XA>960 OR XA<0 THEN PRINT'Je demande une v 
ileur situee entre et 9i 6 cm. . . Corn laud ! ! * 1G0T0 

1570 

.390 PRINT-Y J Hauteur du cadre ; "; a INPUT YB:YA=Y 
B*50 

600 IF YA>960 OR YA<0 THEN PRINT"Une valeur entre 

et 9,6 cm ! ! ! " : GOTO 1590 

610 LPRINT CHRSl 18) 

620 ' 



BLOC ! DEC0MP05I 



ION DU VECTEuS \ 



' = COS (ALPHA) 
1 ■ SINIALPHA) 
FIN B2 



1730 GOSUB 3770 

1740 UX(1) = XX 

1750 GOSUB 3770 

1760 U7.(l) = XX 

1770 GOSUB 3770 



UXC2>=0 SUZ (3) = 



Select: 



IF Y(( 



1790 ' 

1B00 PRINTS960, » 

"PLff-Appuyer <CLEAR> •( 

1B10 CA = PEEK( 14400) : IF CA <> 2 THEN 1B10 

1920 PRINTS960,' Deplacement : f leches 

Validation : <ENTER>" i 
1830 X(l) - INT<<XX*l)/2 + .3) 
1S40 Yd) •= INT<(YY+I>/2 + .3) 
1B50 CA = PEEK( 14400) 
I860 IF CA = 1 THEN 1980 
1870 X(0)=X(1) : Y(0) - Y(l) 

1S50 SET ( X(0),Y<0) > 

1890 IF CA = THEN 1970 

1900 IF CA---8 THEN i 

N Y(0)"Y(0)-1 
1910 

THEN Y(0)=Y<0>+1 
1920 

EN X(0)-X(0)-1 
1930 

THEN X(0)-X<0)+1 
1940 
1950 
1960 

1970 SOTO 1830 
19S0 RESET ( X(l>, Y(l 
1990 PIXEL - KM /XX 



BLOC : 
PORT I 
2010 
2020 : 
2030 



THE 



IF CA*16 THEN IF YI0XYY-1 

IF CA-32 THEN IF XI0>>1 TH 

IF CA=64 THEN IF X(0KXX-1 
RESET* 



i X(0) 



Y<1 



PL-I THEN 2090 

X(2) ■ COS (GAMMA) 
Y(2) - SIN(GAMMA) ■ 



BLOC i 



CADRE SUR CGP 



20B0 ' 
2090 IF PI 
2100 LPRII 
PRINT" J" (- 
2110 ' 



BLOC : DESSINER LA OU LES PLANETE(S) 



- THEN 2110 

CHR*(1BX-1"U 
A)", 0,0, "YA 



IF ABS<X)= 



THEN AN6=3. 1 



2190 
2200 
2210 
2220 
2230 
2240 
2230 
2260 
2270 
22B0 



ANG = ATN<X/SQR(1-X*X>) 
LO - RII) * COS ( ANG > 
LO = LO/PIXEL 
N » NIV /PIXEL 

A - xm-Lo 

C - X(I)+L0 
B ■ Y(I)*2+ N 

IF A<0 THEN A=0 

IF C<0 THEN C=0 

IF A>XX THEN A=XX 

IF OXX THEN C=XX 

IF B<0 OR B>YY*2 THEN 2311 



2Z90 UX(l)=INT(A+.5> : UX(2>=: 

T(B/2+.5) :U-/.(3) = INT(C*.5)'.UX(4) = INT(B/2+.5) 

2300 GOSUB 3770 

2310 NIV = NIV + ( KM /(YY*3>: 

2320 IF NIV < R(I) THEN 2150 

2330 NEXT I 

2340 IF PR=1 AND CDOl GOSUB 3830 

2350 ' 

INITIALISATIONS 



2360 








2370 


for: 


H=1TO6!PRINT3960 


"IMPORTANT : P 


ompre le 


satell ite, taper 


<CLEAR> 


300: 


JEXTI 


IPRINTS960," 


"HFORI-1T 


23B0 


PRINT3960, STRING*! 63 


32)) 


2390 


DX = 


C0SI5AMMA) » DI 




2400 


BY = 


SIN(GAMMA) ♦ DI 




2ft 10 


Dti: 


= SQR < LX*LX ♦ 


LY*LY ) 


2420 


D(2) 


= SQR I (LX-DX) 


2 + (LY-Dy)C2 


2430 


VI = 


V0 




2440 


vs = 


V0 




2430 


Htl! 


= D(l) 




2460 


H(2! 


= D(i) 




.2470 


H(3! 


- D(2) 




2480 


H(41 


■ D(2) 




2490 


SI B 


LX 




2500 


52 - 


LX 




2510 


Tl - 


LY 




2320 


T2 - 


LY 




:-530 




- V0 




2540 


V(2) 


- V0 




2330 


V(3) 


- V0 




2560 




-V0 




2370 


T « 


1 





1690 CLS 



25«?0 CRASH = 

2600 DES^"" 

2610 H1=D(1 ) :H2=D(i> 

2620 D*="M° : FEU = 

2630 T = T + IT 

2640 ' 

BLOCS : TRANSFORMER ET TESTER LES COORDONNEES 

2630 ' 

2660 Ml = Bl/PIXEL + X(l> 

2670 M2 = S2/PIXEL ♦ XI 1> 

26B0 IF MK0 THEN M1=0 

2690 IF M2<0 THEN M2=0 

2700 IF M1>XX THEN Ml-XX 

2710 IF M2>XX THEN M2»XX 

2720 NI = -Tl/PIXEL + Y(l)#2 

2730 N2 = -T2/PIXEL + Y(l)»2 

2740 IF NK0 THEN Nl-0 

2750 IF N2<0 THEN N2*0 

2760 IF N1>YY*2 THEN N1=YY*2 

2770 IF N2>YY*2 THEN N2=YY*2 

2790 'FIN B7 & BB 

2790 UX(1)=M1:UX(2)=N1/2:U7.(3)=M2:UX(4) 

=N2/2 

2B00 IF PR=I 60SUB 4010 

2810 GOSUB 3770 

282B SI = S2 

2B30 Tl = T2 

2840 IF V=>VS THEN VS-V i HI = D(l) 

2930 IF V<"VI AND T>IT THEN VI=V I H2 - D( 1 ) 

2960 IF D(1)>H(1) THEN HI 1 )=D( 1 ) = VC 1 )»V 

2870 IF D(tXHt2) THEN H< 2 )=D( 1 ) i V(2)"V 

2880 IF PL-1 THEN 2910 

2S90 IF D(2)>H(3) THEN H< 3)-D(2) i V(3)«V 

2900 IF DI2XH(4) THEN H(4 >«D<2) > V(4)»V 

2910 ' 

BLOC : CORRECTION DE LA VITESSE 

2920 P = P - G*M(1)*S1»IT/D(l>t3 

2930 IF PL=2 THEN P = P - G*M(2)»(S1-DX 

)*IT/D<2>C3 

2940 Q = Q - 6*M(1)*T1*IT/D(l>r3 

2950 IF PL=2 THEN = - S»M<2 )*( Tl-DY 

)*IT/D(2>C3 

2960 V = SQR( P*P + Q*Q ) 

2970 'FIN B9 

2980 ' 

BLOC ' CORRISER LA POSITION 

2990 S2 = SI + P*IT 

300B T2 = Tl * q*IT 

3020 OU) « SQil-t §2tSS T TSST? ! 

3020 D<2) ■ SQR( (S2-DX)[2 * (T2-DYH2 

3030 C* « INKEVH 

3B4B IF PL-1 PRINTa96B,-Vit*»«e "INT(V+ 

.5)"m/s. ";S9B3> "Altitude " INT( ( < D( J ) -R( I ) ) 
/10B01+. 5) "km " 131004, " Temps "T"», ■ ) 
3050 IF PL =2 PRINT396B T INTlV+.5)"m/5. 

" ja973,CHR*<143)+"Alt Pli"INT( ( (D< 1 )-R( 1 ) )/10 
00)+.5)*km "13992, CHR* ( 143 )+ h Al t P2= " INT ( ( (D(2 
)-R(2) )/1000)+.5i'km " 1S1010, CHR» ( 143) i " "T"B. 

3B60 IF INT(D(l> + .5XINT(R(l) + .5> THEN CRASH = 1 
3070 IFINTID(2) + .5XINT(R(2) + .5) THEN CRASH = 2 
3080 IF CRASH ■= AND C»OCHR*(31) THEN 2630 
3090 IF CRASHO THEN DE*="Votre satellite s'est 
ecrase sur la ■ ELSE DE*=" ========= Interruption 

3100 IF CRASH=1 THEN DE*=DE*+" Planete" :IF PL=2 T 

EN DE«-DE*+" 1" 

3110 IF CRASH=2 THEN DE«=DE*+"planete 2" 

3120 DE*-LEFT«(DE«+STRING*(S6,32),3t) 

3130 PRINTa960,DE»iai016,"<ENTER>"l 

3140 IF PEEKt 14400X>1 THEN 3140 

3150 ' 

BLOC : FICHE TECHNIOUE DU SATELLITE 

II ET DU CHAMP GRAVITAT IONNEL 

3160 CLS!PRINT3400,-DONNEES TECHNIQUES RELATIVES I 

CE LANCEMENT" 
3170 PRINT9464, "============================ 

31B0 PRINTai00B,-Pre5 5 ez <ENTER> " 1 : FORI = 1TO300 

= NEXT I 

3190 IF PEEKI 14400)01 THEN 3190 

3200 ' SATELLITE 

3210 CLS 

3220 PRINT'Lancement- 

3230 PRINTSTRING*<9,131) 

3240 PRINTTAB(4>"Vite««e " tV0s"m/s.* 

3230 PRINTTAB(4>" Angle " 1 INT< ALPHA*li 

0/3. 1413927)/I00|-degres. ■ 

3260 PRINTTAB(4) "Coordonnees <" (LX/1000)"! 

" (LY/I000)"km)" 

3270 PRINTTAB(4) "Altitude "UNT( (SQR(LX*LX 

+LY*LY )-R 1 1 > ) / 1000*. 3 ) I " km" 

32B0 PRINT 

3290 ' CHAMP GRAVITATIONNEL 

3300 IF PL=1 THEN DF*="Champ gravitationnel compos 

e d'une planete* ELSE DF«="Ch*mp gravitationnel co 

mpose de deux planetes. " 

3310 PRINTDF* 

3320 PRINTSTRING*(LEN(DF»), 131) 

3330 IF PL-2 THEN 3370 

3340 PRINT FAS' 4) "Masse de la planete '.'HI) 

3350 PRINTTAB(4)'Rayon de la planete "RID 

/ 1000" km. " 
3360 GOTO 3410 

3370 PRINT"P1. 1 1 .■:,-,■:;.:..:■ "M( 1 ) 'k-j" 1TAB(32) " PI . 2 

: Ma»e "M<2>"kg" 

33B0 PRINT' Rauon "RI 1 > /1000"km" iTAB( 32) 

■PI. 2 l R#uon "S(2)/1000 , km" 

3390 PRINTsPRINT-Distance entre les centres des de 
Suite de la page 25 



...KAMIKAZE 

Durant (a guerre du Pacifique, vous etes le comman- 
dant du porte-avion I'lntouchable et devez eviter les ka- 
mikazes Japonais. 

Noel AUBIN 



TI99 BASIC ETENDU 



(B REM PP0QWMH6 (AMIkAZt 

20 REM POUR TI 79/4A 

30 REM BASIC ETENDU 

4-0 REM MAGNETOPHONE 

SO REM PANASONIC 

4,0 REM TYPE RQ 2731 

70 REM PAR AUBIN NOEL 
BO REM 
90 REM 

100 REM ******** #***#***( 

i.amikazE *> 

102 REM ****«*****»**■*«) 
110 CALL CLEAR 
120 GOSUB 1000 
135 CALL CLEAR 



ISO GOSUB 2000 

160 G05UB 2300 

170 DISPLAY AT (2,2) : "VCULEZ-VQUS " :; DI 

5PLAV AT*4,2)SIZE(26) : "LES RE6LES DU JEU 




'6: JO THEN CiObi'iE JOOO 



■ CALL C0INC(#9,#ll,DIF 

— 1 THEN CALL DELSPRITE 

I : : GOSUB 5620 

I CALL COINCltt9.#lO,DIP 

'- 1 THEN CALL DELSPRITE 

J : : GOSUB 3600 

i CALL C0IWC(4t9.*12.DIF 

. THEN CALL DELSFRITEltt. 



;, 10S.15.PCH+; 
-3,2) 
:»3.RE,PF):: ] 



320 IF' RCJ'-O THEN DISPl AY AT (23. 2) : "FIN D 

U JEU" :: GOTO 530 ELSE GUTO 3S0 

VO CALL HCHAR15, 1,32,640) ! : GALL DEl.SH- 



"'.;■ ■;,:■>: 



'ENCORE ONE I 



;so accept ato 



,27)5IZE<- 



JBEEP VALIDATE 



190 IF A*= ,, D" DR A*="a" THEN GOSUB 4000 
ELSE CALL HCHAR 12, 2, 32, 100) 
195 DISPLAY AT(1,2)SIZEU7) : "RECORD EN F 
□RCE :" :: DISPLAY AT ( 1 , 22) SIZE (2) : "=" 
200 GOSUB 4200 : : GOSUB 2400 : : GD5US 22 

210 DISPLAY ATtS,2)SIZe!BJl"SC0RE l" :: 
DISPLAY AT(2,15)SIZE(10) : "AVION(S): " :: 
GOSUB 3000 

216 REM * I ere EOUCLE * 

217 REM **»**<*-***»***»***#* 
220 CALL J0Y5TI2.X.Y) 



230 VX=VX+<3»V): : VY=VY+ABS 


X > : : CALL MO 


"I0N(#6,VX,VY) 




240 CALL C0INCH(6,»1,DIF(A) 


Cfl>lS IF CA= 


-1 THEN CALL DELSPR(TEUtl) : 


GOSUB 3200 


2S0 CALL C0INC(«6.*2,DIF !A) 


GB)st IF CB= 


-1 THEN CALL DEL5PRITE l#2) ! 


GDSUB 3200 


260 CALL C0INCH(6,#3,35,CC) 


I IF CC=-1 T 


HEN GOSUB 2600 




270 CALL COINC(#6,*4,DIFIA) 


CD):: IF CD= 


-1 THEN CALL DEL5F'RITE(rt4>: 


GOSUB 3200 


280 CALL PD5ITIDN(#6, LI, CD 


: IF LIM90 


)R CL<10 THEN CALL DELSPRII 


.(#6):: CALL 


S0UND<50,-6,2):: GOSUB 300C 




290 IF R0<1 THEN DI5FLAY AT 


24,2):"FIN D 


[ LA 1 ERE PARTIE" :i CALL 


3EL SPRITE (ALL 


i : : GOTO 300 ELSE 220 




300 FOP 1=1 TO 500 : [ NEXT 




310 CALL 50UND<200,-3,3) 




320 PCH=23 :: R0=11 i: S0«6 




330 CALL HCHAR(5, 1,120.640) 




340 DISPLAY AT12.15)SIZE(1C 


:"FUSEE(S>: " 


350 VA=10 :: TA=2 ;: GOSUB 


5000 : : GOSUB 



O ACCEPT AT(23,23)SIZ£l-l>BEEP Vfil.IOAT 
Esl"QNDn")sA* 

5B0 IP A*-"Q" OR A4="a" THEN CALL HCHAR ! 
23,1,32,28):: PCM* 165 :: R0=11 :: VA=10 
:: TA=1 :: P0=0 :: GOSUB 2000 SI GOTO 20 
9 ELSE 590 
590 CALL CLEAR 
600 END 

990 REM ..-**■**.****»*#*»»*** 

991 REM * DEF DES CHARS * 

992 REM **#»*»******<***»*■**• 

1000 GAIL CHAR (96. ■ 0000000000li.-;.OF0700OG0 

ouooooooo'ioooooooooioior- otoc kiooooooooo 

000" ) 

1O10 CALL CHARUOO, '00030FFFFF 7F 7F00O0O0 

OOOOOOOOOOOOBOCOCO^'FFFEFEOOOOOOOOOOOOOO 

0000") 

1020 CALL CHAR(104, "107070FFFF7F7F000G0O 

OOOOOOOO0OOOOOO4O4FFFF1 LILOOOOOOOOOOOOOO 

0000") 

1030 CALL CHARU0I3. "000003377F .'F 3F 000000 

ooooooo-.i'.h.ioooO'H) .'■:< /■:> e.i lf tioooooooooooooo 

0000"! 

1040 CALL CHARI112, " 000003377F 7F3FFFFFFF 

?F3F.3f--3FlF01OOFBFCFFFFFFFFFFFFFFFFF£FCFS 

cooo") 

1050 CALL CHARi 116, ■' 0007.0 jo?::>:o:o::oooooo 

ooooooooooooooooooooooooooooonoooooooooo 

0000"! 

1060 CALL CHAR([20,"FFFFFFFFFFFFFFFF"> 

1070 CALL CHAR(124,-3B3E7FFE7[;7EFEi>0i-i0Oi-| 

ooooooooooooooooo") 

10SO CALL CHAR(12S."OOOO01BF7FBF00000000 

oooooooooooooo ■!■:■; i- _ ff f- ff oooooooooooooaoo 
oooo 11 ) 

1090 CALL CHAR(132, "0BOFJ0B10101F3FFF3F3F 
3F7763C0800O0004187OEOCOE0FFJFEF0C0C0COFU 



THEN GOTO 2090 

2110 CALL SPRITE 

2115 CALL SOUNDC 

2120 CALL FOSITK 

THEN GOTO 2120 

2140 CALL SPRITE 1*4, 104. 13, PCH, 1,0, 

2150 CALL S0UND(50,-3,2) 

2160 RETURN 

2200 CALL SF'RITE(*13, 112,4,90, 1,0,3 

2210 CALL P0SITI0N<#i3,PG,PH):: IF 

THEN GOTO 2210 
2220 CALL SPRITE(#14, 112, 16,45,256, 



22:0 RETURN 

2290 REM »*m«*.H 

2291 REM * MESSAGE * 

2292 REM ***********«»*«*»** 

2300 AS*" AT 

TENT ION. STOP, MESSAGE A TOUTES LES UNITES 

,STDF, COMMENCES L'OFERATION KAMIKAZE, 5TD 

P, KAMIKAZE. STOP 

2310 FDR 1=1 TO LEN<A*> 

2320 DISPLAY AT(2, li : SEES (A*, I ,28) 

2330 TM=(INTIRND*2)+1) 

2340 IF TM=l THEN TEM=I ELSE TEM=30 

2350 CALL SDUND120+TEF1. 1200, 2) 

2360 NEXT I 

2370 RETURN 

2391 REM * AVIONS * 

2392 REM ■»*******#*■»***«*»** 
2400 CALL 30UND140 S 550,2) 

2410 CALL SPRITE (#5,96, 11,32,255,0,-25) 
2420 RETURN 

2450 VX=0 :: V¥=-25 ii CALL POSITIONS #5, 
IF 05<100 DR 05M50 THEN GOTO 2 



3200 CALL POST 
(ITEd 



FCZ.PCV) :; CALL DE 



)(ZO, 120O.2) 



450 

2460 CALL 

2470 CALL 

24BO CALL S0UND42O, 

2490 RETURN 

2390 

2591 REM * DEF DU BATEAU * 

2600 IF CAL-3 THEN GOSUB 2800 ELSE GOSUB 

2700 
2610 RETURN 
2700 CALL P0SITIQN(#3,LA,CA):: IF CA>250 

THEN CA=250 
2710 CALL DELSPRITE(#61 

2720 CALL SPRITEttOB, 124, 16.LA-20, CA+lO) 
2730 CALL S0UND(50.-6,2) 
2740 CALL PGSITI0N(113,LB 

THEN CB*230 
27SO CALL DELSPRITE(WS):: CALL SPF 
,124,16.LE 
2760 CALL 
E(ttB) 

2 7 70 GOSUB 3OO0 
27B0 RETURN 

2BO0 CALL COINC(*a,#i,DIF (A) -2,CE):: IF 
CF=-i'THEN CALL BELBPRITEIKJia BOSUS 72 
OO :: CAL»0 :: VA=VAHO ELSE CALL DELSPR 
irENtb):: GOSUB 3000 



E IS ■ 2V.0 



)(50,-6,2>: 



DELSF'R 



3210 CALL SPRITE(H7, 132,9, PCH.FCW) :: CAL 
L SOUND 1200, -7, 1 ): : CALL COLOR (»7, 10) ; : 
CALL SOUND C 100, -7,1)1! CALL CDLQR<#7,9) 
3220 CALL DELSPRITE(#7) 

3230 CAL^CAL+1 :: CUL-CUL+I :: IF CUL=4 
THEN VA=VA+10 :: GCISUB 2000 
3240 SOSUB 3000 :: GOSUB 290O 
3250 RETURN 

3990 REM **#***!'**»**«*#*»«* 

3991 REM * REGLES DU JEU * 

3992 REM ****»**»*****<***»» 

4000 DISPLAY AT(2,1):" LE JEU CONSISTE 
A TRAWERS" :: DISPLAY AT(4,2): ,, 2 TABLEAU 
X DE DETRUIRE " 

4010 DISPLAY AT(6,2):"LA FlOTTE ENNEM1E 
..." :: DISPLAY AT (8, 2) : "POUR CLlA, 2 OFF 
ENCIVES :" :: DISPLAY AT ( 10, 3) : "-L' ATTAC 
UE AERIENNE" 

4020 DISPLAY AT(12,3):"-LA GUERRE SOUS M 
ARINE ' :: GDSUB 4050 :: DISPLAY AT<2,2): 
"POUR DIRIGER L' AVION DU=" 

4030 DISPLAY AT(4,2):"LE SOUS MARIN UTIL 
ISER " :: DISPLAY AT(6,2): M LA MANETTE DE 
JEU W=2" 

FIC 



4050 DISPLAY AT 1 16, 16) : "PRET <0/N) O" 
4060 ACCEPT AT116,27)SIZE(-1) : AS 
4070 IF AS< -"0" THEN 4060 
40B0 CALL HCHAR(2,2,32,4B0) 
4090 RETURN 

4190 REM *■*■****»»*#»***»■■**** 

4191 REM * DIFICULTE * 

4192 REM **##****«**#******* 

4200 DISPLAY AT (2,2) : "FORCE 1 = FACILE" 

:: DISPLAY AT(3,B!:"4 - DIFFICILE" :: DI 

SPLAY AT(4,2") : 'VDTRE CH0IX:4" 

4205 CALL S0UND(50.8BO,2) 

4210 ACCEPT AT(4,14)SIZE1-1)VALIDATE{"12 

34" HA 

4215 DISPLAY AT11, 19)SIZE(2):A :: DISF'LA 

V AT(1,24):MSIA) 

4220 CALL HCHARI2, 1,32, 112) 

4230 RETURN 

5090 REM ***»*****»«***«*##» 

5091 REM "-SUB DES SO.MARING* 

5092 REM in*t-.»m>i«*it» 
5100 CALL POSITION (#9, P5.F 
TE(*6,116,12, PS. PT, -15,0! 
5110 RETURN 

5400 CALL P0SITIDNi#9,F-CV,PDH):: CALL DE 
LSPRITE(B9>:: GOSUB 6000 :: GOSUB 55O0 
5410 RETURN 
550':' CALL S0UND<5O,-6,2) : : S0=SQ-1 :: Cf 



CALL SPRI 



4O0 CALL MOTION(#' 

410 CALL KEYI2.ST. 

BUB 5100 

420 CALL C0IWCl#6. 

-1 THEN CALL DELSFRITE 

430 CALL C0INC(#6,#2,D 

-1 THEN CALL DELSF'R I TE 

440 CALL C0INC1#6,B3,D 

-1 THEN CALL DELSPRITE 

450 CALL C0INC(06,#4,D 
-1 THEN CALL DELSPRITE (#4 
460 CALL POSITII 







1120 


RETURN 






1990 


REM *■***■»*«*******■***** 
REM » DEF DES SPRI * 


VS1 




1992 


REM ****!UHHM1****-»*#***19 




BU=~1 THEN 60 


2000 


CALL C0L0R(12,S.6) 






2010 


CALL HCHA«(23,1, 120,64!. 


IF (A) 


,CA)II IF CA* 


2020 


CAL=0 1 I CLIL=0 


(#1)1 


GOSUB 3200 


2030 


CALL MAGNIFY 14) 


IF(A! 


,CB):: IF CB= 


2040 


CALL SOUND (50, -3, 2) 


(#2): 


GOSUB 3^00 


20 jO 


CALL 5PRITEHtl,I04, 15.FCH 


IF (AS 


,CC):: IF CC= 


2055 


CALL S0UND(5O,-3,2) 


(43, i 


.2):: GOSUB 3 


2060 


CALL PDSITION(ftl,PA,PB) :: 






THEIV 


GOTO 2060 


IFIA) 


CD)i: IF CD" 


20B0 


CALL SPRITE(#2, 100,13,PCH 


I #4) : 


GOSUB 3200 




CALL SOUND(50,-3,2) 


A, TBI 


: IF TA-.40 A 


2090 


CALL F'0SITI0N(K2,PC,PD) : : 



5520 


CALL SOUN 




0, SE 


n,3) 


5530 


CALL FJPRI 








5540 


RETURN 








3600 


FVTM=INT (R 
















5610 


CALL SPRI 


L 


****» 


166, 


5615 


RETURN 








5620 


PNH=PMH*50 


: IF 


PNH 



I THEN PNH=P 



2900 PD=PO-H 



RO 



1-100 



, 136,: 



.0,20) 



DISPLAY AT(2.26)S1ZEC 



1 THEN IF RO-ll THEN CALL DLLS 
PRITEIALL):: CALL SPRITE (#6, 96, h. 210. 1 24 
,0,O)ELSE GOSUB 2450 ELSE CALL SPRITE(#6 
.116,5,210, 124,0,0) 
7020 RETURN 

3190 REM *****#*******»****» 

3191 REM * EXPLOSION # 



5630 CALL SPRIT 
5640 RETURN 

TjoSO CALL PU'il I KINDS'., MA, MB) 

5660 IF MA=0 THLN GOTO 5690 

5670 CALL SPRITE(#12, 136, 10, MA, MB, 10, i 

56B0 TEM^O 

5690 RETURN 

6.000 CALL SPFdTF (#7, 132,9, POV.PDH: :: CAL 

L -SOUND (210, -7.2): : CALL COLOR (#7, 1.0) : : 

CALL SOUND(200,-7,20> :: CALL COLOR (»7,< 

6010 CALL SOUND (200. -7,201 : : CALL DELSf 



^r 



+ TRS80 
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uk planctes : "DI/IBBB" km. " 

34B0 PRINT'Angle forme par la droite joignani 

deun centres :" INT(fiAMMA»lBB0e)/3. 1415927) /10i 






3410 PRINT B9B6,"p!"MtM>r <ENTER> pour la page suiv 

an t«*l «FORI -1T03BB1 NEXT 

3420 IF PEEK(144BBX>1 THEN 342B 

3430 'VITESSES ET ALTITUDES PARTICULIERES ATTEINTE 

S AU COURS DU DEPLACEMENT 

3440 CLSiPRINT'ViteBBes et altitudes particul ieres 

observseB. "■ 
345B PRINTBTRINGt(46,131) I PRINT: PRINT" Alt itudes : 

3460 IF PL=2 THEN PRINT" En considsrant la Planat 

347B PRINTTAB(3) 



i de la 



imal* a"INT(((H(2)-R<l) 

'PL*" (V ="INT(V(2)*.5)"m/s) 

34BB PRINTTAB{3) "maKlmale : a" INT( t (H< 1 )-fl( 1 > 

)/100B) + .S) , 'km de la "PL«" (V =" INT( V( 1 )+.3> ,l m7s) " 

3490 IF PL-1 THEN PRINT s GOTO 3340 

3300 PRINT* En con«iderant la planets 2 I " 

3310 PRINTTAB(3> 'mlnimale i s" INT( ( (H(4>-R(2> 

)/!0BB)+.5>-km de la planete 2 <V =" INT( V(4)+. 5) "m 
/•)■ 

.... t a'INT( ( (H(3)-fi(2) 



33 3B PRINT 

334B PRINT"Vite»»»« '' 
altitude p*f rapport a li 

335B PRINTTABI3) 'minimali 
LT ='INT( t (H2-R(l ) )/iaBBl- 
356B PRINTTABI3) "maximali 



362B 

363B 
3648 

3650 

366B 
3670 
3680 
3690 
3700 
3710 
3713 
TE.. . 



IF PEEK( 14400)01 THEN 3600 
' CHOIX 
CLS 

PRINT-Desirez-vous : ■ 

PRINT!PRINT:PRINT:PRINTTAB(3>"<1> Re 1 
•llite dans le meme champ gravitatlonn 
PRINTTAB(31"<2> Relancer un satellite 



3900 


02 - COS(IH)* 


'(I>/ 


3910 


IF P2>XA THEN 


P2=X 


3920 


IF P2<0 THEN 


P2«0 


393B 


IF Q2>YA THEN 


q2>y 


3940 


IF Q2<0 THEN 


02=0 


3950 


LPR1NT D*;P2" 




3960 
3970 


D*= U D" 
NEXTIH 








PRINTTAB(g) "<3> Quitter le programme" 

C*="" 

C*=INKEY*:C=VAL<C*)!IF C<1 OR C>3 THEN 36B0 

IF C=l THEN CLS : GOTO 1160 

IF C=2 THEN CLS : GOTO 930 

CLS 

PRINTa400,"VEUILLEZ PRENDRE PATIENCE UNE MINU 

■ : GOSUB 4110 

PRINT376B, " " :PRINT:PRINT 

PRINT3130, "Delcaigne" ;3194, "Patrick" ;396B, "J" 



I FOR I • 
I END 



TO ' 



i NEXT 



PRINTCHR*<27) ; CHR* 



. l'INT(VI + .5)"m/s (A 
. :"INT(VS+.3) "Tr/s (A 



3910 
3620 
3830 
3840 



UU = USR(VARPTRtU7.<0> ) ) 

RETURN 

END 

' VARIABLES 

• DESSIIMER LES PLANETES SUR CGP115 

CYt 1 )— Y( 1 )*(VA/YY) 
I CY(2) = Y!1)*YA/VY - ISINi GAMMA) ■*DI ) / (KM/YA) 
I D*» U M" 

I FOR I = 1 TO PL 

I FOR IH = -3.2 TO 3.2 STEP .025 

I P2 = SIN(IH)*H(I)/(KM/XA) + (X(I)»X/ 



39B0 D*="M" 

3990 NEXT I 

4000 RETURN 

4010 ' POUR CGP 

4020 IF FEU=1 THEN D*="D" ELSE D*= ,, M" 

4030 XI = S2/<KM/XA> + <X(11*XA/XX) 

404B Yl = -T2/(KM/YA) + <Y(1)*VA/YY) 

4050 IF XK0 THEN X1=0 

4060 IF Yl'IB THEN Y1=0 

4070 IF X1>XA THEN X1=XA 

4080 IF Y1JYA THEN Y3=YA 

4090 LPRINT D*iXl",";(-Yl) I FEU = 1 

4100 RETURN 

4110 J*(l) = ♦STRING*(30, , ""> + I, WWC3K7'3W"'O9"- 

RING*(17, "t" ) + 'Tttl84(tlBBXT"*-STRINGt( 1 1 , " «" ) + "#1863 

"+STRING*(12,"* , ')*"DO/H4*<-H6-H4'0TN9"+STRING$<16 

*« ) + "N#l?ltH91ttl91#191»191Y**M*«*5»L;******T(tlB 

1BB-/K7-H4*" 

4120 J*<2)>'"E<-H4l.*tie!3S2^-'*N9■ , +STRINSB(17,"*") + , " 

i'0W'#183#lBB0(tl8BaTTC«DTTP[/H4*'OT&-H6-H4D> ■*»■*«* 

SN9"+5TRING*(20, "* u > + ■ . 4*<0P7#187SCS#I91#1B9Z7* 0T& 

-H6-H4SW#1860*' ' ' X***SS***N9" +STR1NG* ( 21 , ■*" >+"-• 

9B#lS6MP7=JW3#ia3W3#191" 

4130 J*(3)="lX4'aTVttlB50*' " +STRING*( 16, "*" )+"N9"- 

TRIN5*( 19, ■*" >*"DT<#ia8-t/PWlK>0P7t(i87SCS#191#lB9; 

U t-STRING*(21."*">+-N9"+STRING*I13,"*")^"DT<03K5M 

'0T&/R#lB6-#iaB7=JW10O' ' ~4"+STRING«< 19, "*" ) *"U9-- 

TRING«!ll."*' , )*"D-lTa-H4g,-H4'0TWa0*3tllS8" 

4140 JS(4) = "WlWTTH4D<*"-<-BTRING«(ia,"»" ) + "T#iB69** 

*DTS#18B'3W , -H4S'0T&MX<2+'ZS*«*«"0000*'7.-+STRING 

*(14, "»" )f-"DT0P#191C+N9»0W-H4*'0T , 0T&-H4D+'/."*STRIN 
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ROULETTE 



Entrez ce programme et devinez quoi? Votre Oric se 
prendra pour un croupier de Casino. 



Mode d'emploi. Faites vos jeux! 



7 IFAT=1THENCA=) 

10 REM 

20 REM ROULETTE 

30 REM 

40 REM ' 1934 pai- 
45 REM 

50 REM GLAUDON 
55 REM Mill I me 

60 REM 

65 REM 

70 REM POLICE DE CARACTERES 
100 REM MAJUSCULES 
110 DATA65,90 

120 DATA62, 34, 34, 34, til, 50= 50,0 
140 DATA62,34,34,62,46.34,62,0 
160 DATA62, 34, 34,32,32,33,62,0 
180 DATA62, 38.38, 38, 34,34,62,0 
200 DATA62, 4S, 46, 62. 32, 32, 62. 
220 DATA62, 62.32. 60, 32-43.48,0 
240 DATA62, 32, 32.32,38,62,62,0 
260 DAT034,34,34n62,34,38,33,0 
230 DATA2S,S,8, 3, 12. 12,28,0 
300 DATA2.-2,2,2,2,38,62.0 
320 DATA34 - 34 , 34 . 62, 36 , 36 , 36, 
340 DATA32,32,32.32,32,56,62,0 
3*0 DATA62,62,42,42,42,34.34,0 
3S0 DATA62.34, 34, 34, 50, 50, 50, 
400 DATA23, 34,34,34,38,38,28,0 
420 DATA62,46,34,62,32,43,4S,0 
440 DATA62, 34, 34, 34.42, 33,62,0 
460 DATA62,34,34,60,36,36,36,0 
480 DATA62,34,32,62,2,34,62,0 
500 DATA62,62,8,3,3, 12,12.0 
520 DATA34, 34, 34,34, 34. 46, 62, 
540 DATA33, 38,38,313,33,20,8,0 
560 DATA34, 34, - 34> 42, 42, 42, 62. 
580 DATA34, 34 , 20, 23, 20, 34, 34,0 
600 DATA34,S4,34,8. 12. 12,12,0 
620 0ATA62,62,2,4,60,43.62,0 
630 REM minuscules 
655 DATA97,i22 
640 DATA0,O,62.6,62,34,62,0 
660 DATA32,48,43,62,50,50n62,0 
630 DATAO, 0,62,32, 48, 62. 62,0 
700 DATA2, 2,2, 62, 33. 38,62,0 
720 DATAO, 0,62,34, 62,32, 62,0 
740 TJATA30, 16, 16, sfc. 16,24.24,0 
760 DATAO,62, 33.33,62,2,62,0 
730 DATA32,32,32,60,62,34,34,0 
300 DATAS, 0,8, 8, 12. 12, 12.0 
320 DATA4, 4, 4, 12,12.44,60.0 
840 DATA32, 32,34,34,62,38,33,0 
360 DATAS. 3, 8, 24, 24, 24,24,0 
880 DATAO. 0.62, 42, 42, 42, 34,0 
900 DATAO, 0,62,34, 33,38,33,0 
920 DATAO.0,62,34,34,34,62,0 
940 DATAO.0,62,34,34,62,43,43 
960 BATA0,0,62.34,34,62.6,6 



Maxime GLAUDON 



7030 i-ORV'l-OiSsP.EAD:^!: .i 



7100 PL0T27-AT.5, 1 :PL0T33+AT, 5, 
6 
7105 PLi3T27-AT,13,0!PL0T36+AT,l 



7115 PLO" r !■:-,+ A T - I ?- ?:PL0T21 -AT, I 



7120 PLOT 3+* 




32 I O FOR [ = 1 ~o i: G ( I ) =5: 3 ( r +3 ) =1 3 

3215 F<I+3>=F(I) :NEXT!RETURN 

9000 C-LS=PAPERO 

9010 PLAYI,0,0,0:F0RG!=1T07 

9020 FORI=OT05:MUSIC1, I. 1, 1500 

5030 NEXTI.GcPLAYO, 0,0,0 

9040 WAIT500:|.-:>:!-'Li:iDE:F-RINTia* 

9050 M*-"Vous avez fait saule 1 
a banque ! ■! GOSUB10800 
9060 END 

10000 D=4*012:P0KED-l,6:Pi:ikED,2 


10001 P0KED*16,20:P0KED+17,16 

10005 S*=tt*<5) 

10006 &03UB10010:WAIT200 



7125 PL0T15-AT.5 , 3: PL0T22-AT- 5 1000:3 GOS'-iBlOOlO: Q=FRE (. ■ 

,6 RN 

10010 FORI=1TOLEN(S*> 

10012 CALLCA 

10015 POKEP+I,ASC<MID*<: 

10020 NEXT?! RETURN 

10100 PL0T13-AT.26, "IMP! 
":WAIT50 
10110 PL0T13-AT.26, " 



7126 S=70O+FNT (500) 
7128 FQRI=0T06:READM*(I> iNEXT 
7130 G0SUB10000:PRINTHS:HS; 
7132 PL0T12+AT, 16, NM*-CHR4 C4> 
7135 PL0T10+AT,17,M*10)+STR*(S) 



7137 IFS=OTMEN10500 
7133 IF3>=20000THENWAIT200:i_,y3U 
B12300:GOT09000 
7140 PL0T8-AT,18,M*(l> 
7145 P=16:N=19:k-6:G03UB12500 

IFZ>STHENGOSUB10100:GuT071 



10120 PLOTP+f 



: RF n 



L 0-500 CALLCA 

10502 F0R0S=1T01003ST£P3 

1O505 SDUND1,0S,3:NEXTDS 

10510 PLAYO, 0,0,0 

10560 F0RI=1T040: PRINT: NEXT 

10570 G0SUB123O0 

10535 PRINTCHRS<30> 

10590 F0RR-1T04:READMS 

10595 GOSUEU 0300: NEXT 

10600 WAIT300:STPP 

10*00 PG=LEN(M*> 

10820 FORH=1TOPO 

10330 PRINTMID*(M*,H,1> j JWAIT E 

10340 NEXTHJWAIT 301PRINT 

103 : ;0 RETURN 

11000 F0RU=16T026 

11001 PLOTi+AT.U," 

7200 IFWW>360RWW<1THENGOSUB1010 ETURN "iNEXTSR 

11500 EXPLODE 
GOSUB1000 



45 

7155 A=Z:S=3-A: IFS=OANDA>200THE 
N60SUB 12O00 

7160 PL0T6,20,M*(2) 

7165 GETR*:IFR9="S"THEN7190ELSE 
IFR*="M"THEN7170EL3E7165 

7170 PLOT10*AT,21,M*(3>:K=l:P=3 
3sN=21 

7175 GOSUB12500:IFZ>60RZ=OTHENG 
OSUB10100:GOT07175ELSEHG=Z 

7130 CALLCA 

7135 PLOTF<HG)+AT,GlHG) ,192:G0T 
0720S 

7J90 PLOT 9*AT,22,M*(4) 

7195 K=5JP=17:N=23:G0SUB12500:W 
W=Z 



7210 GOSUBlfeOOO 

7240 IFWW=ETHENZAPsZAP:3=S + A(?.i 
:WW=0= GOT07310 
7245 C=(E/2)-INT(E/2) 
7250 GOSUBM6*200+12800 
7270 PLOTF(H6)»AT,6<HG>,32:HG=0 
7300 1FKNTHENPIN&:5=S+A*2 
7310 REM 

7350 SOSUB110003GOT07130 
7400 REM ==================-=== 



.1501 PLOT2-AT,9,176:WAIT200 

11505 PL0T2+AT,9,4S 

11510 GQSUB11000 

11515 S=S+A 

11520 PLQT9+AT,13, "-MISES REM! 
URSEES-" 

11525 WAIT200:GOS'JB11000 

11530 IFSGN(-WW>THENRETURN 

11535 PLOTF(HG>-AT.G(HG) ,32:RE 



TRAN. 



L'autre jour, nous etions tran- 
quillemenl en train de bon- 
der le journal, comme tous 
les mardis a Irois heures du 
matin, lorsque nous vfmes 
debarquer Monsieur Tran, le 
createur des lecteurs de dis- 
quettes Jasmin. II titubait, vi- 
siblement beurre, et parve- 
nait avec peine a articuler. 
Nous comprimes Dependant 
qu'i! venait de feter le pre- 
mier anniversaire de sa so- 
ciety, qu'ii avail decide de 
baisser ses prix et qu'il sou- 
haitait en faire prof iter les 
lecteurs de I'HHHHebdo. II 
nous tendit un papier cons- 



Lecteur simple t§te avec 

contrdleur: 2990 

Lecteur double tete avec 

contrdleur: 3950 

Deuxieme lecteur simple 

tete: 1790 

Deuxieme lecteur double 

tete: 2990 

Contrbleur (compatible avec 

lecteur Oric): 1690 

Promo anniversaire, lecteur 
simple tete + traitement de 
texte Easytext + gestion de 
fichiers Repertory Ficb + 
livre TDOS et ses fichiers + 
TDOS + jeu Terrified Terres- 

tors Invaders: 3490 

Imprimante Jasmin, matri- 
cielle qualite courrier, 50 cps. 
jambages descendants, tous 
accents, graphique, bi-direc- 
tionelle, 132 caracteres par 
ligne, caracteres eiargis, 
condenses, gras, graphiques, 
grecs, inclines, mathemati- 

ques; 2690 

Amplibus (cordon):. 390 

Assembleur Irois passes:. 490 



telle de taches de vin et de 
graisse, sur lequel etaient 
portes des prix etonnants. 
Nous les avons reproduits ci- 
dessous (pas les laches, les 
prix) pour que vous puissiez 
juger par vous-meme. Profi- 
tant de son ethylisme tempo- 
raire, nous lavons conduit a 
nous promettre que tous les 
lecteurs qui joindraient cet 
article a leur commande se- 
raient servis en priorite. En- 
voyez done I 'article, votre 
commande et le cheque a 
I'adresse suivante: TRAN 
sari, 53 impasse bleriot, 
83130 LA GARDE. 



Easytext 590 

Logograph . .. ., ... 490 

Multi'ich. 690 

Commerce 1 690 

Astro calcul 490 

En route vers la galaxie CE2 

390 

Ongraph ......350 

TDOS" 150 

Disqueltes d'accompagne- 

ment TDOS: 130 

Disqueltes vierges 65 

Ajoulez 40f de port pour les 
logiciels et les livres, ou 80f 
pour le materiel. Ltvraison 
una semaine apres reception 
du cheque. Le materiel est 
garanti 6 mois. Amen. r 
(NDLR: This article ci-dessus 
is not un veritable article, it is 
a publicity mat d6guis&e. Si 
Monsieur TRAN vous livre 
pas dans les delais pr&vus, 
vous nous ecrivez pour qu'on 
lui remonte les bretelles. 
Comme ga, apres son anni- 
versaire, ce sera sa fete I) 



EMENT SUR LES NUfltFK'V.: " 
4210 DATA" 1SMAN8UE (■ 



', 12,14, 



1120 
1140 
2000 
£010 
2020 
2040 
2060 
2080 
2100 



DATAO, O, 62, 32, 62,2, 62. O 

DATA16,16, 60, 16,16.24.24,0 

DATAO, 0, 34. 34 . 34, 34 , 62 , O 

DATAO, 0, 34. 34, 34, 22, 14, O 

DATAO, O, 34 , 34, 42. 42 . 62 . O 

DATAO, 0,34, 34, 62.38, 38.0 

DATAO, 0, 34, 34. 34, 62, 2, 30 

DATAO, 0,62, 2, 6, 24, 62,0 

REM CHIFFRES 

DATA43, 57 

DATA62, 34, 38 , 42, 50 , 62, 62 , 

DATA3,24,8,8, 12, 12,28,0 

DATA62,34,2,2, 14,48.62,0 

DATA62.2.2,14,2,46,62,0 

DATA32, 32, 32, 52, 62, 4, 4, 

DATA62, 32, 62, 2, 2. 53, 62. O 

DATA32, 32, 32, 62, 34, 58, 62, O 

DJ-!TAi.2,2,2,2,'2.6,t,0 

DATA62, 38, 38, 62. 34, 62, 62, O 

DATA62, 34 , 62, 2 , 50, 62 ,62 , O 

FORI=1T03 

READ A, B 

FORR=AT0B 

Z=460S0+3*R 

F0RU=0T07 

READC:POk:EZ*U,C:NEXTU,R, 1 

REM * 

0=46369= POKED, 62: PKKEO+2, 6 



7500 CLS:p,:-: : -t;S i-Qv 
G 

7602 E*=CHRS(27) :C*=CHR*(4) s C!*^ 
CHR* (17)5 HS=CHR* (11): X*=CHR» ( 1 3 

7505 PLOTlO-tAT.O. ■'("■"'•— -"-"■---'■ 



7520 PL0T10+AT, 3.- "]•"■'" 



12005 PLOT3+AT..26, "OU1TTE OU DO 
IJBLE, QUELLE CLAS3E '" 
12100 WAIT200 
1220O PL0T3+AT.26, " 

■' : RETURN 

12300 P0KE4S012, 32 = F0KE43023- 1-2 

12301 RETURN 

1250O PLOTP-l+AT,N,K:V=PiTl=0 
12505 REPEAT 

12510 SETT*:TI=T1+1 

12511 IF(Y«=X*GRT*=CHR*«2?i ) AN 
DTI=rrMEN12510 

12514 IFTI=CHRS ( 127 ) THEMV=y -IIP 
LOTV*AT, N. 32: 2* "LEFTS (2*. LEN ( Z* 
1-1) IG0T01251O 

12515 JFT*«E»THEWCL , £-!GiD?;.iiEii:'i':>0 
:PRINTO*:END 

12520 IF <TS- "0"ORT*>"9" ) AWDTS< > 
XSTHEN12510 

2530 2*=2S4-T»: 2=VALf2S> 



4ilS [iATA"5:PAIRS. . . " 

4220 DATA-OU 6:N0IRS" 

4222 DATA"DANS CE CAS VOUS NE 
POUVEZ GAGNER SUE LE DOUBLE DE V 
■RE MISE " 

4224 DATA"POUR SORTIR DU JEU E 
N C0UR3 BE PARTIE, PRESSEZ LA TO 
UCHE £ ESCAPE 3" 

4226 DATA"P0UR COMMENCER UTILI 
SEZ CETTE M6ME TOUCHE" 

4500 DATA" <,'-'".-■"'•'•'"*'**■#■- ""> 



7540 PCtKE48031,2:POKE4S121,3 


12540 




7542 WAIT 10 


12550 


UNTILT*=X* 


7545 NEXTI:RETURN 






7550 REM EXPLICATIONS 


12900 


POPJijOrri7310 












KN=(C=.5j:RETURN 




13400 


KN=<C(E)=1>:RETURN 




13600 


KN=<E>18):RETURN 










14000 


KN= (C (E) -01 : RETURN 



5500 DEFFNT(T>- 



J REM DEBUT DU JEU PRO 

i GOSUBSOOO* CARACTERES 
i G0SUB750O'TlTRE 
I PL0T13+AT,5, " ENTREZ" 
> PL0T13»AT-6.;'V0TRE NGM: ' 

F0RI=lT07iPRINT:NE/T 
- INPUT" ";NMS 

■ NM$=CHR*(5)+IMM* 

CL'i : GOSUB7500 

bO-?.lJB7550' EXPLICATIONS 

CL-?:lf=.3ttG-5:DIMX(M) , Y if 



7025 
NEXT 
7030 
7035 



7570 HS(2)"BS+(- 

7575 H*(13)=H#(13>*B* 

7530 H*(l)=B*tHt El) 

7535 P0RI=5T011:Ja-J*+B*+H9(Ii : 
NEXT I 

7590 F0RI=12T014iP*=P*+E*+U*a> 
:NEXT 

7640 REPEAT 

7650 T=B:A*="" 

7660 PL0T13+T+AT, 12,20 

7670 F'L0T12+AT,12i 

7700 FORI^tTO 



AS°>/ 



+HSC 



^[THENFiIiRI = .lT04:F 



'705 A*-A*+B* 

7710 GOSUB7900:WAIT200 

7720 A*=J**B*:iiOS'JB7900 

7730 WAIT 200 

7735 A*=P*+B* 

7740 GOSUB7900 

7750 WAIT3O0 

7760 UNTIL KEY4=tHR* (27) I 



14102 DATA 37 

14104 DATA8.8, 8, 63,0,0, 0,0 
14106 DATA 35 

14105 DATAO, 0,0, 63,3, 8, 8, 8 
14110 DATA 94 

14112 DATAO.0,0,63,0,0.0,0 
14114 DATA 95 

14116 DATAS, 3,8,63,3,3, 8, 8 

14113 DATA 123 

14120 DATAO, 0,0,15,8,8,8.3 

34122 DATA 125 

14124 DATA0,0,0.56,S.S,8,8 

14126 DATA 64 

14128 DATA63, 33,33,33,33, 33,33, 
63 

14130 DATA 91 

14132 DATA8,8.8,56,0,0,0,0 
14134 DATA 93 

14136 DATAS, a, 3.13,0,0,0,0 

14133 DATA 92 

14140 DATAS, 3.3, 56, 3.3, 8. 8 



14610 DATA1, 

19,21 

14620 DATA23,25.27.30,32,34,: 

15000 rem'messages 

15040 data" uous avez:" 



15070 DATA" OPT ION: 1,2,3,4,5 >~. 



15030 DAT A 41 VOUS MI3EZ SUR LE:' 
15090 DATA-FAITES VOS JEUX" 
15100 DATA-RIEN NE VA PLUS" 
15200 DATA"He Dui, eels devail 



15202 DATA"' 



4502 DATA" 
13 ROUGE 
4504 DATA"/^# 

4506 DATA"! 1 



MANQUE 



12 IMPAI 15206 DATA" II 
15208 DATA" re 



4510 DATA-'IO! 



4518 DATA" 14 PASSE 

16 NOIft I" 

4520 aATA"3 AAA *^ ,AW " 

4600 REM RO'UGES&NOIP: 



redou 

16000 REM TIRAGE 

16010 E=FNT(36» 
■- 16020 IFE-0THEN&OSUB1 1500:ROP:G 
0T07130 

16030 NS=STR»IE)5L=LEN(N»)-1 

16035 M*-RI6HT*(NS,L) 
■■. 16040 X=X<E>:V=V(E>:SHOCIT 

16050 C0=SCRN<X-1*AT,V) : CV=7-C0 

16060 PLOTX-1+AT.V.CV 

16070 J=ASC(LEFTS(N», 1)> 
'- 16075 PL0TX*AT,Y.J+123 

160S0 IFL=2THENU=ASC (RIGHT* (N*, 
5 1) ) :PL0TX+1+AT,V,U+128 

16090 WAIT350:PL0TX-1*AT.V,C0:P 
* LOTX+AT.V.J 

16100 IFL=2THENFL0TX-tH-AT,Y,U 

16110 RETURN • 



r'OPl = fi 
PCi-Eij.; 

FORI=li 



.'900 



=LEN(* 



4142 I 



I 47 



iDP*:pRINTD*: 



AT, V(I) ,MID*(Ra.,2 
i*2!IFJ''9TH£NII-G<-l 



7910 for: 

7915 pl0t13+at,12,mjds(as, i 

7920 wait9:k*=key* 

7925 IF|.:*=CHP.S(27)THENP0P:i 
020: ELSE IFKt=" "THENWAIT 100 

7930 IMEXTI: RETURN 

3000 REM CARACTERES 

S050 FORN'lTOll 

3055 READ B 18-8*8*46080 

3060 FORU- 0T07:READC : POKEC!' 

306": NEXTU.N 



44 DATAS: 

DATA" ON PEUT GAGNER AU JE 
i ROULETTE DE DIFFERENTES 
,0TCi7 FACONS:" 

14202 DATA" OU VOUS MISEZ SUB 
UN NUflERO PRECIS (CHANCE SIMPLE) 
, CDANS CE CAS." 
14204 DATA" SI VOTfE NUMERO SOR 




(D- 



>23iF 



1 VOUS GAGNEZ : 



1 OU VOUS MISEZ 



Fori 



4,7*9530 

^ Suite ria la nane 9% 



6«C 



Suite de la page 25 
r':asuTttiaB3 , i 



■ 09«»»'BV-H4DWSB" 



■ 7. • -ST 



RINGS 

ft 150 J*l3>=STRINS»<9,"t" 1 +"TB3R#191S#191»191ltl914* 

*«*NYTTTTTTmtieeWU-+STRING«(36,'T-)*'tHB*ZTTTT(HB7 

tll9mi91#191((19H<191»lBBXTTt!ie6i»MTTTT4»DTTT»*TTT 

TTtDTTTTSD'l***»D4»«»»D'.«TTTTT»DTTTT»»«»»M««09»««l 

aB0e»#i9i0Bfi H 

4160 J*rf,)=-9**«#1<?1»**N^B(*»N9*««*N7*»««N9««««191 
**SNAG i SsaCSS***SN* 1 B9T T TWWWWUTWTT' 
WUWWTVWUWUTVUTTTWTTTVWUWW" -STRING* 



iit75 PKimSi>i^,b-^ 

41SB J*( J-l)="° 

«I9B FORJ=1TOLEN(J*( J)) 

42BB J*=nID*( J*(J), I, 1) 

42 IB lFJ*="tt" THENA=VAL(M10»(J*!J>. 1-1,3) HI^ 

EA-A5C(J*)+92 

4220 J*( J-1)=J*1J-1)+CHH*(A) 

4Z3B NEXTI. J 

4^35 CLS 

ft^tO F0RI»aT03tPHINTJ*(I ) i tNEXT 

425B P0KE163B3> 19B: POKE 1631 4, 239:PRINTa955, ' 

a;'6B return 



MINE HANTEE 



II paraft qu'une mine hantee regorge de sacs remplis 
d'or. Quelle aubaine pour ceux qui ne croient pas aux 
fantomes... 

J. Luc PENOT 
Moded'emploi: 

Vous disposez d9 3 vies et tes regies son! dans le programme. 
Si par megarde, en possession d'un sac, vous etes ecrase par un 
chariot, vous serez bien sur penalise d'une vie et vous reapparaitrez 
a votre poinl de depart avec r obligation de deposer votre prise 
avant de repartir. Score en (in de partie. 



CANON 




BIO IFF>-245THENT=1 rGOTDSoO 

aso 6(i>-'-eu>:gu]=23o:beepi*s,! 

C=245: GOT0880 

860 locatexiii , y(i>:printchrsigu 



665 LOCATEXIJ 



927 V«V+1 

940 RESTORE: eOTOH 




1570 nextj: locate:, 

















234 


230, 230, 230, 230, 230, 








234 


™ 


""»■-"""«"« 


1%IV, 


» 


0,230,231,233,234,23 




231 


230,231,230,240,230, 


0,231,233,234,230,231 


QO DAT 






90 REM 


<DATA Seine DECOR?--- 








, 240,2 








230 


230,230,230,231,230, 


2o'mT 




30 230 234 234 230 2 








231 


«* 


230,230,233,227,230, 


so 2 dIt* 


7,0 


11,1,10,2,8,3 



US87ELSECLS 



foro=128t0133: locate!*, y: pr! 
iom:beepo-ioo,o-12S!NExtq 
jft-2thenlocatex,v:printchf 



AB=206C=1 CP=40 DE=1 

Hfio=e BflS=2l -anu=0 pro=4i 

GOTO 2980 

DIV=2 

AB=2 BC=19 CP=2 PE=39 

HAU=1 8AS=20 GAU=1 DR0=49 

LOCATE (12,1? 

PRIHT "*VOTRE JEU SERR..." 

. OCATE < 13,20) 

PRIHT "■EiX-FflCJl-E." 

locate a*-zaj 

print ■:;:; i.-sr ■-■ULtHHT. - 

LOCATE £15.20) 

PRINT "m-DIFFICILE." 

LOCi'TF C 16.20> 

PRINT -X4]_TRES DIFFICILE." 

LOCATE < 17.29) 

PKJHT "LSD-IMPOSSIBLE." 

primi "taper von.:i- uiO tR^[NQ, J" 

rj:i-v^kt.vs rep=VAL< REP« > 

IF R£P<1 OR REP>5 THEN 2210 

KK=('PEP*4VPr-' >-*2 TH1=599 

CPT=ri ■;;r: = n PRT=0 

GOSUB 210 

RE M ****************** * 

REM INITIALISATIONS TABLEAUX PU JEL 

!=.-:■' ;rv : -,.f.j v.;.-.i ; , rtX.vi'. •■ 

RANPOMIZE 

FOP 1=1 TO 100 

■^ = 1 1 1 T ' i 3*F,'HD+2 ) 

B=INK3B*RNP+2! 

C=IMT. ;::-,.Ph;.-i '■ 

TFK ft, B >=C 

NEXT I 

REM i *** c i :f*t:?:t::f ********* 

REM PE3SIN E>U JEU 

REM **********»:********** 

CLS "BUY" 

FOR 1=1 TO 20 

FOR J=l TO 40 

LOCHTE <I.J) 

IF Tfi(I.J)=l THEN CALL COLOtK " 1RU H 

PRINT CHR*f5> GOTO 2460 

IF TFKI.J)=2 THEN CALL COLW " 1 tU" 

PRINT ri- : »c. S> GOTO 2460 

IF TfKI,J)=3 THEN CALL COLOR- " VW . 

PRIHT CHR*(5) GOTO 2469 

NEXT -J 

NEXT I 

CULL COLOPC'IBG" ) 

LOCATE '.22 J 1>PPIHT "SCORE " 

LOCATE < 22. 20) PRINT "TEMPS" 

CALL COLOR("0b") 

FOR 1=1 TO 40 

LOCATE C21/1 > 

PRINT CHRSC169) 

NEXT I 

IF 0IV=2 THEN 2570 ELSE GOTO 2679 

CALL COLORC'ICb") 

FOR. I = J TO 40 

LOCATE (1.. Iv PRINT CHRSU0) 



2690 LOCATE (29,1) PRINT CHRSC10) 

2610 NEXT I 

2620 FOR J=l TO 20 

2630 LOCATE (J,!) PRINT CHRSC10) 

2649 LOCATE (J. 40) PRINT CHEW 19 ) 

2650 NEXT J 
y.-.-f-'-i pni ■»->■. m:-^* * mxiT***** 

2679 REPI JEU 

2c- : r- pen :■■.■;■; ■.;■.■;■;■.■ 

WO "RLL. C0L0RC1BU'"* 

r.-iT.;, [-,;-3 r_,Y--2 0Z=1? DN-3'i' i'=2 v=? U=39 Z=19 

3710 CALL PEP" KT, PH. 31 CALL PEP(PX,PY.l) CALL OEPfDZ, Ml, 4 • 

CALL PEP'.DX.PY,2) 

ivi? TEI1=TEM-1 CALL AFT' TEH) IF TEM=9 THEM 3329 

2739 IF X=HAU THEN X=AB'GOTO 2750 

2749 IF X=BAS THEN X=BC 

2759 IF Y=GAU THEN V=CD GOTO 2779 

2760 IF Y=DRO THEN Y=PE 

2779 PO=TH<>:,Y> IF PC -g THEN GOSUB 3059 

2789 IF P0=6 THEN 3098 

2790 CALL PEPoO-.Y. PX, pv '■ PX=:: r>V=v CALL DEP',Z,W.4) 
2800 IF X<2 THEN 2999 

2310 IF X>2 THEN 3009 

2820 IF Y<U THEN 3010 

ZB -vy if v -11 THEN 3929 

2849 IF N>DP0-1 THEN il^DPG-1 GOTn 2;^0 

2850 IF U<GfHJ+l THEN M=GfllJ+I 

2860 IF Z>8HS-1 THEN Z=BA5-1 GOTO 2880 

2879 IF Z<HAU+1 THEN 2=HRU+1 

2880 PR=TA(Z.H? i r rPT -J9 THEN PA=^. 

2850 CALL PEPCf 2,H,DS.PN ' Tfi( - u>=--Ci ^7=2 f.n;---:. 

IF X=Z AND Y-!'l THEN ?-2&d 
2900 IF PATO0 THEN GOSUB -939 
2910 PAT=PA \'*Z G=U 
:-?23 TAll C'€«- V ." 
;■-!.* run M-vi^M.-n?: 

2940 IF^KA=I2S OR KA=79 THEN X=X-1 OTTO 2729 

2959 IF KA=130 OR KA=6Q THEN X=X+1 GOTO 2729 

2960 IF KA=129 OR KA'72 THEN Y=V+1 GOTO 2720 
2970 IF KA=131 OR Kft=S4 THEN V=Y-1^G0T0 2720 

;:-?f Win 2729 

2 a 9l? Z=Z-INKRNP-.UKI" > 'I0T0 2820 

--^i-'fi Z-Z + INHP.NDJ.UKIO iOTO 2829 

3010 W-W-INTCRNP*. v-v< ■ :' ,[r: t'i*v 

■■■M£n M-H+IHTi'RNC', W-y ! GOTO 2848 

■..-■-:•; T^'V.G"? CALL ROl.". : P( "IG") CALL DEP<:v,G,6) = 

CALL COLORE" IB") 

3048 CALL SPEECH' "L.. "s-TlO RETURN 

x-j^if -j <-'.: :.fii.i. *'■■■•■'■■ ■"*-■!'.: x, y 3»f.i 

CALL SPEECH("L,"!.T£5) CPT=CPT+1 RETLIRN 
3060 REM ********************* 
3070 REM PIEGE 
1 ■ ; l > s 

3099 CALL SPEECW"L."&8'J«) 

3100 CALL DEFS'-tf.V PX ■ PY 1 CALL COLORE "1RU") 

3110 FOR 1=1 TO 28 CALL PEP-: X, Y. 7 1 CALL 0EP'I',Y,6> NEXT I 

3120 CALL COLORC'ICW") 

3130 FOR I*X TO 1 STEP -1CRLL PEP< I, Y..8 ) CALL DEPtl,Y-9J 

3148 CALL DEPa.Y.0) NEXT -I 

::]=,0 LIS "Ueb" CALL COLOR' "BUB 1 ' ) 

3160 LOCATE (4,4) 




PRINT "VOUS ETE 1 :: TOMBE PAN'; UN PIEGE F 
GOTO 3439 

r-FN *■*■*********■!■*(******* 

REM MANGER 

PI M I M . " ■ ■ 

CALL SPEECW'L.'^BSS) 

CRLL COLORVICH") 

FOR I=X TO 1 STEP -1 CALL OEPr I , Y, 81 CALL DEP( I , V, 3 ) ■ CALL COLORX"IB 

CALL OEPa,Y,0) CALL PEF " Z ■ M - 3 :■ CALL. OEPr Z .. M .. 4 > 

CALL COLORE. "1CU") NEXT I 

CLS "UBU" CALL COLOPC "0U0" ) 

LOCATE <4,4) 

PRINT '■VOUS AVEZ ETE PEVORE PAR LE CHAT'i'" 
33S0 GOTO 3439 
3^19 REM :i:-;::U?.-«>i;Tf;^:******* 
■■X:',: REM -IN i)U '■:;:''■■ 

n itl*m 

3348 CALL SREELH'' "F- . ■■::,SiiSJi.5a*Sig8*) 
3330 PAUSE 4 

3360 CALL SPE£CH<: ,i A, i 'l<SlK<32*!!<S3>) 
3370 CLS "H8to" CALL COLOPf "9UB" ) 
3330 LOCATE (4.4) 

3390 PRINT "BRAVO' I I VOTRE TEMPS E'3T ECOULE ET VOUS ETES Tfnj .JOUPS Yi'.'RN 
3400 REM *; **** 

3419 REM SCORE FIMAL 

■■■: :■■! :■ ; . .■;:■■.! 
3430 LOCATE (19,4) 

3440 PRINT "VOTRE SCORE PE POMMES " ■ 3C 
3450 PRINT " VOTRE TEMPS UTILISE ".JOSJ-TEM 

3460 PRINT : ' VOTRE TOTAL ' " , SC+509-TEM 

3479 SC0=SC+599-TEM 

3489 IF SCOASCu iV*'_.- psllK S THEN PRINT "BRAVO 1 PECORP BATTIJ. '■ ASCO=SCO 

3499 IF ASC0=6 THEN RSCD=SCO 

3500 LOCATE (16.1) 

3519 PRINT "VOULEZ-vOUS REJOUER 'CO^Nll" 
3320 REPS=KEY* 

3339 IF REP»O"0"flNP PEPS<>"N"THEN 3529 
3348 IF REP»="0"THEN 3618 

3530 PRINT " TANT PIS 

3360 LOCATE <19,7> 
3370 CALL COLORC^BL") 

-,.,;:■-:,:■, H ..,;:T ,-" !-if I ! i: fr INTI^MTT . . - 

3590 CALL COLOR'. '9B* ) 

3690 ENO 

3610 PRINT "PATIENTEZ S.V.P." 

3620 FOR 1=1 TO 49 

3639 FOR J=I TO 20 

3640 Tfl<J.I>=9 
3650 NEXT J ■• NEXT I 
3660 GOTO 1350 

3670 REM Ssrs***;-?-'.-**- s--t:*m:«* 

3630 REM DEFINITIONS PES INSTRUCTIONS 

' !! 
3799 SUB DEPCDR, OB, PC) LOCHTE 'PA. ['■£:.■ PRINT rHPS'PC; SUBENP 
3710 SUB ftFT(T) LOCHTE f ?2.30) PPINT T SUBEHO 
3720 SUB AFSCS.' LOCATE ' 22 . 19 ) PRINT '■ SUFENP 
3730 SUB DEPS<OA,PB,PC,PP) LOCATE (PCPD) PRINT CHRS< 9 >' LOCATE <Ofl,DB> 

3749 PPINT CHRI1 1 ) SUBENP 

3750 SUB OEPC'PA-PS.pC.Pf> LOCATE • PC , PP ' PRINT CHR«r 0) LOCATE fDfl.OB) 
3760 PRINT CHR«r 3) SUBENP 
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SEMAINE 



BATTLE FOR MIDWAY par PSS pour C64 
AMSTRAD.MSX, ATARI 



4 Juin 1942 Paciiique. Arcfii- 
pel de Midway. Temps ra- 
dieux. 5 heures du matin. 
Decollage imminent des 
avions de reconnaissance Di- 
rection Nord-Ouest. Vol de 
routine jusqu'a sep! heures et 
retour a la base 
Rapport de Blue Tango 5 H 
17. Mouvements tarles au ci- 
tron [* ) direction Midway Ap- 
procne en haute altitude 
Flotte composee de quatre 
porte-avions plus destroyers, 
croiseurs... 

Alerle a toute la Ilotte, alerte a 
loutes les bases Atlaques des 
tartes au citron en provenance 
du secteur H 2. Direction ac- 
tuelle quatre heures. Envoyer 
U.A. (• ' ) 2 et 3 secteur G 3. 
Envoyer U.A 4 et 5 secteur G 
4. Attends rapport... 
Porte-avion T.F 16 a base Mid- 
way 7 H 03 T F 16 euotl ac- 
tuellement une attaque en pro- 
venance des tartes volantes. 
Tourelles de commandement 
gravement touchees Ravitail- 
lement des U.A. 2 et 3 impos- 
sible. Les envoyer sur la base 
de Midway. 

Bien recu. OK. Aux U.A. 2 et 
3. ravitaillemenl a Midway 
Pas de retour vers T.F. 16 Je 
repete; pas de relour vers 
T.F.16. 

U.A. 5 a base Midway 11 H 
40. Deux destroyers et un 
porte-avion coules. Retour au 
T.F. 17pour ravitarJIement. 
U.A 1 a base Midway 12 H 
17. Deux flottes de diversion 
convergent vets Midway 
Flotte 1 secteur M 3. direction 
acluelle deux heures Flotte 2 
secteur I 7, direction actuelle 
cinq heures. 

UiA 4 a base Midway Dernier 
avion en (eu Saute dans cent 
secondes. Dirige avion vers 
porte-avion jap'. 
Rase a toutes les unites Flotte 



ennemie defmitivement de- 
truite. Concentrez les attaques 
vers flottes diversion 1 et 2. 
Position actuelle flotte 1 sec- 
teur N 2, direction deux 
heures. Position actuelle flotte 
2 secteur I 5 direction quatre 
heures trente. 



VICTORY ' 

Ce scenario, vous pouvez le 
modifier a chaque partie. Votre 
action tactique et strafegique 
Influe en permanence sur les 
mouvements japonais. Un ex- 
cellent compromis entre le 
Wargame et le jeu d'arcade 
servi par un bon graphisme et 
une sonorisation de grande 
qualite. 

Amlral FLETCHER 
(" ) tartes au citron flotte japo- 
naise 
(* " ) U.A : Unite Aerienne 




HEBDOGICIEL REPREND A SON CO/MPTE LA GRANDE 
TRADITION DU FEUILLETON ET PRESENTE : 



menu 



PEPE LOUIS CONTRE LE GANG DES PUCES ! 



...Un feuilleton en 30 episodes 
delirants qui vous tiendront en 
haleine 

RESUME DES EPISODES 
PRECEDENTS: 

Marie-Odile Conchoux, mena- 
gere, est envoutee par un 
mysteneux sortilege. Erie 
grimpe dans sa machine a 
laver qui decolle comme une 
fusee ... 



II fait si froid que je commence 
par me remuer quelques 
doigts de pieds pour voir si ca 
fonctionne encore. Apparem- 
menl tout va pour le mieux, et 
c est pas demain que la goutte 
s'installera pour squatter mes 
chaussettes. 

La goutte, je laime dans un 
petit verre blanc, bien ra- 
peuse, quand elle vous des- 
cend la colonne comme un ra- 
moneur avec son herisson. 
L'alcool. c'est pas une pas- 
sion, c est du quolidien. Pas 
sulfisamment pour ressembler 
a Michel Simon la veille de 
I exlreme onction, mais tout de 
meme.. Je n'imagine pas son- 
ner les douze coups de midi 
sans un ou deux kirs pour me 
rechautfer lame, et avant 
dentamer la tournee du pa- 
tron. 

Je bois, et je n'aime pas qu'on 
masticote Cest le propre de 
pepe Louis. Grande gueule, 
grand coeur. grand gosier. tout 
le monde vous le dira. Faut 
pas marcher sur mes plates- 
bandes 

Je ne sais pas comment ca se 
passe, mais je finis toujours 
mes journees chez Dominique, 
a Tangle de la rue Fremicourt. 
Ce petit cafe est sans preten- 
tion aucune Cest la que 



j'achete I Hebdo et que |e fais 
mon Loto chaque semaine. Je 
suis un vieux con qui se les 
gele parce que c'est Ihiver 
Or done, je n'en linis pas de 
siroter mon blanc-casse quand 
[a sonnerie du telephone se 
met a grelotter comme mes 
genoux. 

- Cest pour toi Pepe Louis I 
me crie Dominique en agitant 
son torchon sale au dessus du 
zinc. 

- Merde I Qui peut bien me 
deranger a c't'heure el a mon 
age ? 

Je rale parce que je viens 
d'apprendre que les retraites 
seront payees tous les mois et 
il faudra que je me deplace 
trois fois la ou je ne me depla- 
cais qu une seule. Jattrape le 
combine et \e rumine un "alio" 
si profondemenl desagreable 
quit ferait fuir un temoin de 
Jehovah 

- Alio Louis ? Ici le Vieux. 
cong ! Je besoing de te voar 
d'urgence, cong I Secoue tes 
chicots. enfile Ion pantalong 
de baba et rapplique d'ur- 
gence cong ... Ctoc Pas le 
temps de repliquer. il a de|a 
raccroche et je reste suspendu 
au comptoir comme un ail sur 
une gousse 

Le vieux, pour vous expliquer. 
cest comme qui dirait le pa- 
tron dun service de police par- 
ticulier specialise dans les zor- 
dinateurs (cong) et dont j'ai 
fait partie pendant des annees 
avant de me retraiter peinar- 
dement derr/ere mes fagots de 
pastis. Ah la la I I J en ai mene 
des missions contre les pirates 
informatiques J'ai demantele 
le gang de Munich huit 
mdmes de creche qui pira- 
taient fa BUNDESBANK Jai 
coince Johnny Disquette dans 
un rayon de la FNAC J ai mis 
le Clean Crack Band sous les 



Si le Vieux fait appel a moi au- 
jourd'hui, cast qu'll doit etre 
dans la panade totale Mais 
tout de meme, pour ressortir 
Pepe Louis d'un placard, faut 
vraiment plus avoir de person- 
nel sous la main. 
J'enfile mon impermeable, 
mon dernier verre, et je calte 
vers la maison parapluie ou je 
sais que le Vieux m'attend 
Effectivement, il est derriere 
son bureau, I'oeil embue par 
les douze verres de "VISQUI" 
(comme il dit), qu'il a vides 
depuis midi. Je sens qu'il a bu. 
mais la boisson lui fait le 
meme effet qu'a moi: il arrive a 
garder son "cellefeu-contro- 
leu". Faut dire que le Vieux est 
pas ne a Roubaix, et rien 
qu'avec I'accent. il vous de- 
coupe un calendos en huit 
tranches parfaites. 

- Ah te voilaa I ! Assieds toi. 
cong. Tu veux une ciga- 
rette ? ? ? 

- Monsieur le Directeur, vous 
savez que je ne fume plus 
depuis que je suis a la retraite 

Suite page 11 „ 
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CONSOLES ET ACCESSORIES Tl 99/4 
Micro -ordmaleur Tl 99/4A Pal / Perilel / Secern 
Maduiaieur Secom France 
Cable liaison magneto cassettes 
Magneto cassettes Texas instruments 
Magneto cassettes Lansay / Compteur el cable 
Impiimcnte Seikoschu GP So A 
Imp rime me Selkosclia GP 500 
Impilmante Epson HX80 fnclian/naclion 
Machine a ecrKe Btother EP 44 a memoiie 
interlace parallels exleiieure pour Tl 99 
Interface serie exlerieure pour Brother pour Tl 99 
Exi ended Basic manuel anglais 
Extended Basic manuel tiancals 
Extension memoiie 32K exterieure 
Manetie dejeux Super Joy a veniouse avec 
interlace speciale sapportonl 2 moneftes 
Manelie Quick snot II a ventouse Fir bioque 
avec odapioieui poor 2 manettes 

PROGRAMHATfON 

Tl Logo n° 2 en (rancais liveable avrn (Module) 

Mini memoiie liviable avril (Module) 

K7 Basic par soi-meme 

K7inlroduc|ionauT199/t 

K7 introduction au Tl 99/2 

K7 les techniques de programme de |eui n° 1 au n" 2 75 F 

K7 la poncluolion en traneats 75 F D 

K7 divlseur PGCO/PPCM 75 F D 

K7 EPSILON/SOFTWARE POUR Tl 99 

Lunai Lander 2 pour Basic etendu 

simulation de vols spotiaux 95 F D 

Lunar Jumper / Basic etendu : molo de lespace 1 20 F tJ 

Solar sysieme Bosic etendu pilotage 

6 la carte en 3 dtmensWns 1 20 F D 

Sum Games (les jeux olympmues) 1 20 F D 

K7 HEBDOGICiELS SOFTWARE POUR Tl 99 

N" 3 rubis socie Basic eiendu 95 F 11 

N° 4 6 |eux dont Oaik Crystal Basic etendu 1 20 F [ ! 

MODULES TEXAS ORGANISATION 

Geslion de tictiieis 260 F U 

Gestion de lappons 375 F D 

Geslion privee 360 F rj 

MODULES EDUCATION 

Ad dit ion/ Subs ii action 

n°louZ 147FL1 Addition Cannon 147 F IJ 

Mission motns 147 F D Division/ Demolition 147 F B 

Maiei>iMullipliruiinn]47Fn Multiplication 1 147 F 11 

Early reoding/eieirice de lecture paur debutant 

enangiois 147 FD 



A V0S CONSOLES Tl 99/4 basic etendu disponible 




MODULES LOtSIRS 

Connect Four 147 F . I jeux video 2 147 F II 

Jeux retro 1 147 F G The attack 1 47 F IJ 

Jeuxretio2 147 F '_] Othello 206FL] 

invaders 206 FD Munch Man 206 FD 

Carwarks 147FL1 Chasse aux wimpis 147FL! 

Zero zap 147 F D 

NOUVEAUX LOGICtELS TEXAS 

Retour du pirate 250 F l~ Demon attack 250 F D 

Mash 250 F : : Burger time 250 F I I 

Miciosurgeon 250 F ! : Happer 



250 F D Treasure Is 



250 F I i 

250 F li 
250 F LI 



LOT N"l INDISPENSABLE 

■ Module BASIC ETENDU manuel en liancais 

■ K7 Basic par soi-meme 

■ K7 Lunar Landei 2 (simulation de vols 

spatiaux) 850 F □ 



K7 Basic par soi-meme 

Extension meraoire 32K ext 

K7 technique des piogrommes de |eu< n° l 



J LOT N" 3 ETUDES DU LOGO 






Le module Basic etendu manuei 


en lianqais 




Extension memoiie 32K ext 






■ Tl logo n" 2 






1 t'ensembie 




2795 FD 



MODULES ATARtSOFT POUR Tl 99 

MoonPairal 219 F ~, Miss packman 219 F C 

Delender 219 F E3 Pool position 

Jungiehunt 219F': (dlsp tin mars) 219FI 



MODULES FUNWARE POUR Tl 99/4 
Rabbil Rail le lapin malm 
Driving Demon jeux de voituies 
St nick le Peie Noel arrive 
Ambulance avez-vous condui 



MODULES R0M0X POUR Tl 99 

• Princess and Frog 9 nlveaux. module d'adresse i 
tous ■ Traverser I'alltedes cavolieis Traverser le tleuve Inleste 
de crocos Reussir a d&ivrer la princesse Le lout en 
musique 120FD 

• Aniealei 9 niveaux Un combo) sans merci dans les gaieties 
creusees pai les combatants Acceleration loudroyante a 
panirda T niveau. 120 F □ 

• Rotoi Raiders 9 niveaux Poc Man diaboiique el en 
musiOUB 100 FG 
■ Hen Pecked 6 niveaux Jusqu'd 10 ans un giand combat de 
coqs en musique. 100 F D 



PR0GRAMMATI0N SUR DISQUETTES 
Coltiet peiipherique Texas arlgine USA 
comprenant le boitier, le conlioteur 
eil'unllededlsqtielte 



LANGAGE PASCAL compienant 

La carte P code el les dlsquettes Pascal 



LOGICIELS SUR DISQUETTES 

Fichieis d'adresses sur dlsquettes 



Aide a la orogrammalion n 1 
DisaaeHes eleclricile 
Res i si a nee des m 
Maltiematiqi 



415FU 
206F!i 
206 F a 
375 F □ 
375 F [1 
252 F I. I 



NOUVEAUX CONTROLS URS DE DISQUEHES 
entlchables dans la Oolte penphenque comptable avec 
les anciennes unites de dlsqueiies Texas alnsi au'avec 
la nouvelle unite double lace double densite 

. . . 3330FD 



UNITE DE DISQUETTE MEGREE 
peripherique Slim Line 0/2 hauteur) double lace double 
density, capacite 360 K avec te nouveau contrflleui 
de dlsqueiies Ceite lame permel a Integrei 2 lecteurs 
dans le compartlmenr disque de la boile penphGnque 

2500 F D 



BON DE COMMANDS 
TAR IFS FtVRIER 1985 


Adresse 


HL: 




m 






ProduilB 


aisconibles aans la limiie He dm Moc 


s en majasm 




our les JDg.ciels • 30 F Se renseign 


n lecoprncnde 

BomlescollB 
1 eiranger 


GS.'BJ 1) 


Saint Gcimoin 7S005 PARIS 
6BBB Telex ETJtAM 220064 f 1 1 303 

LivioisDn lies pnmuiis rtaiwftibies sous 8 
Demonder la lisle des modules He |e 


z. 



